VB6: Como revisar que exista un archivo.mdb?

[Sir Matrix]

Hola,,,, tengo que validar que exista una base de datos access en determinado directorio... alguna idea de cómo hacerlo??


saludos

[vbx3m]

Pon este codigo:

Private Sub Form_Load()
On Error GoTo Fallo
x = GetAttr(`C:\archivo.mdb`) 'Puede ser cualrquier tipo de extension
MsgBox `El fichero existe.`
Exit Sub
Fallo:
MsgBox `El fichero no existe.`
End Sub

Me avisas que tal...

[aavg]

If Dir("C:\Directorio\Base.mdb") <> "" then
msgbox "existe la base
Else
msgbox "no existe la base"
End if


Siempre hay mas de una solución para un problema =)

[Sir Matrix]

Muchas gracias! me ha funcionado muy bien