SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: rodovr en Viernes 14 de Octubre de 2005, 00:23

Título: Api Findfiles
Publicado por: rodovr en Viernes 14 de Octubre de 2005, 00:23

Hola amigos tengo el siguiente codigo en una etiqueta para abir la BUSQUEDA de Windows:

Private Sub Label4_Click()
Dim s As String
    ' Crear el objeto Shell
    Set oShell = New shell32.Shell
    oShell.FindFiles
End Sub

Me lo abre sin problemas pero esta minimizada la ventana y yo quiero que al momento de darle click al label me aparezca sobre mi aplicacion (es decir que no este maximizada).

Ya busque en la lista de metodos y propiedades y no le encuentro por donde.

Si alguien puede orientarme muchas gracias

Título: Re: Api Findfiles
Publicado por: cpmario en Viernes 14 de Octubre de 2005, 02:21

Aquí encuentras la información necesaria y ejemplo de código

http://www.elguille.info/vb/ejemplos/ShellObjects.htm (http://www.elguille.info/vb/ejemplos/ShellObjects.htm)

 :smartass:

Título: Re: Api Findfiles
Publicado por: rodovr en Viernes 14 de Octubre de 2005, 20:22

De hecho de ahi fue de donde baje el codigo y hace lo que explique anteriormente.

De todas formas muchas gracias por tu ayuda.

Hasta luego