Ver Mensaje Individual
  #22 (permalink)  
Antiguo 11/09/2008, 08:58
Avatar de Taribo007
Taribo007
 
Fecha de Ingreso: agosto-2007
Mensajes: 1.338
Antigüedad: 17 años, 5 meses
Puntos: 18
Respuesta: abrir carpetas

Pero no me has contestado, la funcion devuleve la ruta correcta???

Ejecuta esto con, por ejemplo, 400 (que no te funcionara ahora)

msgbox RutaCarpeta("400")
if len(dir(RutaCarpeta("400"), vbDirectory))=0 then
msgbox "No se encuntra la ruta")
else
msgbox "Si esta"
end if

un saludo