Explorador de Ficheros

[albertogarci86]

Hola,
necesito una función que me permita explorar ficheros y guardar la solución en un textbox.

Gracias

[geokym]

Utiliza este código.

http://www.forosdelweb.com/f69/treeview-listview-347299/

Esta es la llamada a la función

ruta = BrowseForFolder(Me.hWnd, "Selecciona un directorio")

y depués pasas el contenido de la variable "ruta" al textbox que necesitas ...
ojalá te funcione, adios!

[ValentinoMolinari]

Hay un componente del visual que se llama CommonDialog y lo insertas en los componentes, es muy facil de usar. mira este es el código

Private Sub btnDirectorio_Click()

CommonDialog1.Filter = "xls|*.xls"
CommonDialog1.ShowOpen

If CommonDialog1.FileName <> "" Then
TxtArchivo = CommonDialog1.FileName

End If


End Sub

en este caso solo filtra archivos de Excel, pero puedes filtrar por lo que quieras, simplemente pasandole las extenciones que necesites
espero te sirva

[geokym]

Ups sorry era de ficheros :p



revisa este código:

http://users5.titanichost.com/geokym/fweb/directorio.rar