| Pregunta: | 47212 - BUSCAR EN UN FILELISTBOX |
| Autor: | Jaimix |
| Hola! Tengo Visual Basic 6.0. Estoy programando un buscador de archivos en un directorio concreto. El caso es que tengo un FILELISTBOX con todos los archivos de ese ddirectorio, pero cuando quiero realizar una búsqueda en ese mismo directorio, no sé que comando utilizar. Alguien puede ayudarme? Muchas Gracias! | |
| Respuesta: | Pedro Pineda |
| Que tal!!! lo que quiere hacer es muy sencillo, para buscar un archivo en el filelistbox debe crear un bucle for de la siguiente manera.... Dim i ' declaro el contador, el nombre del filelistbox sera FILEPRUEBA for i = 0 to FILEPRUEBA.listcount - 1 if "archivo.txt" = FILEPRUEBA.list ( i ) then msgbox "el archivo si existe" exit for end if msgbox "el archivo no existe" next i Asi le sale lo q quiere hacer pero Otra forma de hacer eso, es hacer una referencia a la libreria de "Microsoft Scripting Runtime" luego declara una libreria de esta forma "Dim fsaprueba as new Filesystemobject" y listo esa libreia le deja hacer maravillas con archivos, copiar, pegar, mover y lo q usted necesita. despues de declarar la libreria haga esto en un boton o donde lo necesite: if fsaprueba.fileexist("C:\windows\prueba.txt") = true then Msgbox "El archivo existe" else msgbox "el achivo no existe" end if | |