Busqueda de archivos

07/04/2005 - 19:30 por Edilberto Arteaga Lopez | Informe spam
Hola a Todos
quiero hacer una aplicacion que me permita hacer busqueda de archivos en un
disco duro y me los muestre y que ademas yo pueda eliminar esos archivos. Y
no tengo ni idea de como hacer las busquedas. La idea es solo dar la
extencion del archivo y el me busque en todos las unidades de la maquina
esos archivos.

Gracias por su atencion

Saludos.


___________________________________
Edilberto Arteaga Lopez
Coor. Sistemas
Fruit of the Loom, Honduras - Planta Tela
Para Solicitud de Soporte Tecnico favor hacerlo en la Web de MIS
http://domain-ty/ o a http://ftlmis/

Lo que hacemos en la Vida
Tiene su eco en la eternidad.

Preguntas similare

Leer las respuestas

#1 ajpb
07/04/2005 - 22:25 | Informe spam
Un ejemplo:

Dim m_Path as String = "C:\"

Dim m_DirInfo As New DirectoryInfo(m_Path)

Dim m_FileInfo() As FileInfo

m_FileInfo = m_DirInfo.GetFiles("*.txt")

En m_FileInfo tienes un array con todos los archivos del tipo txt en C:\

Saludos

PD: Los eliminas con el metodo Kill()

"Edilberto Arteaga Lopez" wrote:

Hola a Todos
quiero hacer una aplicacion que me permita hacer busqueda de archivos en un
disco duro y me los muestre y que ademas yo pueda eliminar esos archivos. Y
no tengo ni idea de como hacer las busquedas. La idea es solo dar la
extencion del archivo y el me busque en todos las unidades de la maquina
esos archivos.

Gracias por su atencion

Saludos.


___________________________________
Edilberto Arteaga Lopez
Coor. Sistemas
Fruit of the Loom, Honduras - Planta Tela
Para Solicitud de Soporte Tecnico favor hacerlo en la Web de MIS
http://domain-ty/ o a http://ftlmis/

Lo que hacemos en la Vida
Tiene su eco en la eternidad.



Respuesta Responder a este mensaje
#2 Edilberto Arteaga Lopez
08/04/2005 - 20:44 | Informe spam
Esto solo me muestra los de un directorio
pero yo quiero solo darle la ruta del disco y busque en todo el disco
o si es un folder que busque el los folderes que estan dentro de el


Saludos.


___________________________________
Edilberto Arteaga Lopez
Coor. Sistemas
Fruit of the Loom, Honduras - Planta Tela
Para Solicitud de Soporte Tecnico favor hacerlo en la Web de MIS
http://domain-ty/ o a http://ftlmis/

Lo que hacemos en la Vida
Tiene su eco en la eternidad.
"ajpb" wrote in message
news:
Un ejemplo:

Dim m_Path as String = "C:\"

Dim m_DirInfo As New DirectoryInfo(m_Path)

Dim m_FileInfo() As FileInfo

m_FileInfo = m_DirInfo.GetFiles("*.txt")

En m_FileInfo tienes un array con todos los archivos del tipo txt en C:\

Saludos

PD: Los eliminas con el metodo Kill()

"Edilberto Arteaga Lopez" wrote:

Hola a Todos
quiero hacer una aplicacion que me permita hacer busqueda de archivos en
un
disco duro y me los muestre y que ademas yo pueda eliminar esos archivos.
Y
no tengo ni idea de como hacer las busquedas. La idea es solo dar la
extencion del archivo y el me busque en todos las unidades de la maquina
esos archivos.

Gracias por su atencion

Saludos.


___________________________________
Edilberto Arteaga Lopez
Coor. Sistemas
Fruit of the Loom, Honduras - Planta Tela
Para Solicitud de Soporte Tecnico favor hacerlo en la Web de MIS
http://domain-ty/ o a http://ftlmis/

Lo que hacemos en la Vida
Tiene su eco en la eternidad.



Respuesta Responder a este mensaje
#3 htb
08/04/2005 - 21:17 | Informe spam
Un ejemplo:

Private Sub BarreDirectorio(ByVal pFolder as string)
Dim oFolder as New DirectoryInfo(pvc_Folder) 'Abrir folder
Dim oFileInfo As FileInfo ' Archivos
Dim oSubFolder as DirectoryInfo ' Sub folder

' recorre archivos Archivos
For Each oFileInfo In oFolder.GetFiles("*.txt")
oFileInfo. (lo que quieres hacer con el archivo)
Next

' recorre los sub-folders (recursivamente)
For Each oSubFolder In oFolder.GetDirectories()
Me.BarreDirectorio(oSubFolder.FullName)
Next

end Sub



y lo inicias con

.BarreDirectorio("C:\")
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida