Visual Basic - AYUDA PARA ENCONTRAR ARCHIVOS

Life is soft - evento anual de software empresarial
 
Vista:

AYUDA PARA ENCONTRAR ARCHIVOS

Publicado por Hernan (42 intervenciones) el 13/08/2004 16:06:55
Hola como les va??? quisiera saber si me pueden ayudar, mi proble es el siguiente: Necesito abrir una serie de archivo pero puede ser que algunos no existan, como hago para corroborar que existe o no sin que me tire el error de no se encontro el archivo. Muchas Gracia. Saludos
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:AYUDA PARA ENCONTRAR ARCHIVOS

Publicado por miguel (1042 intervenciones) el 13/08/2004 19:05:09
Lo puedes hacer asi, ejemplo:
Dim NomArchivo As String
Private Sub Command1_Click()
If Dir(NomArchivo, vbArchive + vbNormal) = "" Then
MsgBox "Archivo No Existente", vbInformation
Else
MsgBox "Archivo Existente", vbInformation
End If
End Sub
Private Sub Form_Load()
NomArchivo = "C:\Miguel.doc" 'Esta es la Ruta del Archivo a verificar
End Sub
Si tienes alguna duda puedes escribirme a mi correo saludos!!
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