Saber si un fichero existe


Truco de Visual Basic 6.0 - Saber si un fichero existe


Para determinar si un fichero existe:

Private Sub Form_Load()
On Error GoTo Fallo
x = GetAttr("C:\Trucos.txt")
MsgBox "El fichero existe"
Exit Sub
Fallo:
MsgBox "El fichero no existe"
End Sub
Pon el truco en tus favoritos Pon el truco en tus favoritos