Sigo con el tema del SHELL
Publicado por Bill G. (103 intervenciones) el 19/05/2001 03:46:16
conseguí este código...
La declaración:
Private Declare Function ShellExecute Lib "shell32.dll" Alias _
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory _
As String, ByVal nShowCmd As Long) As Long
Usar la función:
zRet = ShellExecute(Me.hwnd, "Open", file$, "", "", 1)
que debo modificar para que me abra un archivo ZIP? (por ejempo ubicado en D:\archivo.zip)
gracias por la onda y la paciencia!!!!!
La declaración:
Private Declare Function ShellExecute Lib "shell32.dll" Alias _
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory _
As String, ByVal nShowCmd As Long) As Long
Usar la función:
zRet = ShellExecute(Me.hwnd, "Open", file$, "", "", 1)
que debo modificar para que me abra un archivo ZIP? (por ejempo ubicado en D:\archivo.zip)
gracias por la onda y la paciencia!!!!!
Valora esta pregunta
0