
23/07/2003, 06:13
|
| | Fecha de Ingreso: enero-2002
Mensajes: 55
Antigüedad: 23 años, 4 meses Puntos: 0 | |
Bueno, ya esta ya me ha funcionado, paso la rutina por si alguien le sirve (coger el nombre del fichero de su ruta de path):
Dim PrimeraCadena, SegundaCadena, CadenaFichero, Posicion
PrimeraCadena = request.form("path")
SegundaCadena = "\"
Posicion = InStrRev(PrimeraCadena, SegundaCadena)
CadenaFichero=Mid(PrimeraCadena,Posicion+1)
Chao |