[VB6] Chiudere la finestra di Internet Explorer

[sanny82]

Ciao tutti,
come posso fare per chiudere una finestra di Explorer lanciata precedentemente?

Grazie mille

[LeleFT]

Linguaggio?
Ricorda che va specificato anche nel titolo.


Ciao.

[sanny82]

Scusa, dalla fretta ho dimenticato di scriverlo...
VB6.

[MItaly]

Come apri la finestra in questione? Intendi Windows Explorer (Explorer.exe) o Internet Explorer (IExplore.exe)?

[sanny82]

Internet Explorer
ShellExecute Me.hwnd, "", "C:\Programmi\Internet Explorer\iexplore.exe ", "www.html.it"

[MItaly]

Credo che ti convenga usare ShellExecuteEx, che restituisce un handle al processo creato, o l'istruzione Shell di VB, che restituisce l'ID del processo avviato.
P.S.: un consiglio: se usi ShellExecute o ShellExecuteEx usa il verbo "open" e inserisci solo l'URL da aprire come lpFile, in tal modo si aprirà il browser di default e non hai bisogno di recuperare il percorso dell'eseguibile di IE.

[sanny82]

come sarebbe la sintassi?
ShellExecuteEx Me.hwnd, "", "open", "http://www.html.it", App.Path, 1

[MItaly]

Dai un'occhiata alla MSDN... la faccenda è un tantino più ingarbugliata .
Di seguito le dichiarazioni necessarie...

Public Type SHELLEXECUTEINFO
        cbSize As Long
        fMask As Long
        hwnd As Long
        lpVerb As String
        lpFile As String
        lpParameters As String
        lpDirectory As String
        nShow As Long
        hInstApp As Long
        '  Optional fields
        lpIDList As Long
        lpClass As String
        hkeyClass As Long
        dwHotKey As Long
        hIcon As Long
        hProcess As Long
End Type
Public Function ShellExecuteEx Lib "shell32.dll" Alias "ShellExecuteExA" (ByRef lpExecInfo As SHELLEXECUTEINFO) As Long