SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: FRIJU en Lunes 20 de Octubre de 2003, 08:18

Título: Re: Busqueda de archivo
Publicado por: FRIJU en Lunes 20 de Octubre de 2003, 08:18

Hola Compañer@s!
  Alguien me puede decir que código debo de utilizar para saber si existe un archivo en mi Pc y como lo utilizo.
   Muchas Gracias.

:think:

Título: Re: Busqueda de archivo
Publicado por: ROBER.29 en Lunes 20 de Octubre de 2003, 10:30

Añade la siguiente referencia a tu proyecto:

Microsoft Scripting Runtime

Utiliza la siguiente función:

 

Código: Text

1.  
2. Function File_Exist(PathFile as string) As Boolean
3.     Dim File As New FileSystemObject
4.  
5.     If File.FileExists (PathFile) Then
6.         Msgbox ("El fichero existe")
7.         File_Exist = True
8.     Else
9.         Msgbox ("El fichero no existe")
10.         File_Exist = False
11.     End If
12. End Function
13.  
14.  

A la función la llamarías de la siguiente forma, ej:

value = File_Exist("D:Rober_prueba.txt")

Espero que te sirva de ayuda.

Saludos.

Título: Busqueda de archivo
Publicado por: FRIJU en Lunes 20 de Octubre de 2003, 10:35

Muchisimas gracias Rober!!!
:kiss: