Ficheros en VB

[Sergio]

                                hola
estoy haciendo un sistema de records para un jueguecillo que he hecho en vb y necesito saber si un archivo existe. que funcion hay q usar???
gracias de antemano y un saludo                                

[BeRSeRKeR]

                                Prueba esto:

If Len(Dir$(rutaArchivo)) <= 0 Then
           ' El archivo no existe
       End If

Saludos                                

[jaure]

                                Tb puedes probar esto

Public function ExisteFichero(ByVal sRutaFichero as String) as Boolean
     Dim iCanal As Integer
     On Error goto etq1

     iCanal=FreeFile()
     Open sRutaFichero For Input As #iCanal

     Close #iCanal
     
     ExisteFichero=True
     Exit Function

etq1:
     ExisteFichero=False

End Function                                

[Sergio]

                                ok
muchas gracias!!
saludos!!