Visual Basic - Saber si una ruta existe (no la de un fichero)

Life is soft - evento anual de software empresarial
 
Vista:

Saber si una ruta existe (no la de un fichero)

Publicado por NoExit (2 intervenciones) el 03/10/2005 17:13:45
Ruta valida

Hola a todos foreros! ¿Como puedo saber si una ruta es valida,
es decir, si existe?. No si un fichero existe, esto es trivial usando
la funcion Dir(). Por ejemplo, ¿como saber si la ruta
'c:\descargas\musica' existe?
He pensado en la siguiente solucion, pero me parece k debe haber
algo mas elegante y/o sencillo, a saber:
puedo intentar crear una archivo en la ruta k kiero saber si existe
y si no se produce un error de acceso,
es que la ruta es correcta.
Supondo k debe existir una funcion o API para hacer esto, es una
tarea muy sencilla a primera vista.

Gracias mil de antemano.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Saber si una ruta existe (no la de un fichero)

Publicado por Koflax (7 intervenciones) el 03/10/2005 17:39:25
hola si ai una... mira este codigo lo encontre por ai ...

Escriba el siguiente código: (una de tanta maneras aparte de Dir$())

Private Sub Form_Load()
On Error GoTo Fallo
x = GetAttr("C:\Autoexec.bat")
MsgBox "El fichero existe."
Exit Sub
Fallo:
MsgBox "El fichero no existe."
End Sub

espero ke te sirva... Saludos :D
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Usa también Dir

Publicado por Zoto (6 intervenciones) el 03/10/2005 19:56:56
Hola NoExit.

Para saber si un directorio (ruta) existe, puedes usar también la función Dir$, pero pasando como parámetro segundo el atributo vbDirectory.
A continuación te muestro un ejemplo:

'----------------------------------------------------

Dim strPath As String 'Contiene la ruta a checkar si existe

strPath = "C:\descargas\musica"

If Dir(strPath, vbDirectory) <> "" Then
MsgBox "El directorio existe"
Else
MsgBox "El directorio no existe"
End If

'--------------------------------------------------------------

Como ves no tiene demasiada compicación. La línea de código principal es esta:

Dir(strPath, vbDirectory)

llamar a la función Dir pasando como parámetros el directorio y el valor vbDirectory (para indicar que es un directorio).
Lo demás es como cuando se checka un archivo cualquiera con esta función.
Si devuelve nulo, pues no existe.
Contrariamente (devuelve el nombre del archivo) pues si existe.

Espero que esta simple explicación te ayude a resolver tu problema.
Si tienes otro problema o duda, pregunta en el foro.

Hasta la próxima.

Zoto
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Usa también Dir

Publicado por NoExit (1 intervención) el 07/10/2005 14:12:48
Muchgas gracias a ambos, pero me kedo con la respuesta de Zoto, es exactametne lo k buscaba. La solucion de Koflax es perfectametne valida para saber si un archivo existe o no, pero no era el caso. Muchgas gracias a ambos de nuevo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar