Newsgroup: it.comp.lang.visual-basic
Titolo: Aprire il browser massimizzato senza conoscere il path !!

BlankSalve a tutti i NGini!
Vorrei aprire la finestra di Internet Explorer o comunque del Browser
preferito senza sapere in che directory è stato installato! (per questo ho
già trovato due possibili soluzioni!). Ma il problema è che vorrei aprirle
"massimizzate".
Lo so' fare con il comando shell ma occorre il path!
Vi riporto le due soluzioni che ho trovato, vedete se riuscite a
massimizzare la finestra:
1) SOLUZIONE
Dim MyPath
Public Sub Main()
Dim TheBrowser As Object
Set TheBrowser = CreateObject("InternetExplorer.Application")
MyPath = CurDir
With TheBrowser
.Visible = True
.Navigate (MyPath & "index.htm")
End With
End Sub
2) SOLUZIONE
file bas:
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
Public Const SW_SHOWNORMAL = 1
esecuzione:
Private Sub Command1_Click()
RetValue = ShellExecute(Me.hwnd, vbNullString, "d:\index.htm", vbNullString,
"d:\", SW_SHOWNORMAL)
Label1.Caption = RetValue
End Sub
Grazie fin d'ora!!
Ciao
Gianni Maiori - Cagliari

OK!! ho trovato subito la soluzione (mi sono letto il file win32api.txt di
windows):
basta sostituire la dichiarazione
Public Const SW_SHOWNORMAL = 1
con un'altra del tipo
Public Const SW_SHOWMAXIMIZED = 3
Grazie comunque e continuate così!!
Ciao a tutti
Gianni - Cagliari






Come non detto!!
Purtroppo non ho risolto nulla!! La soluzione che ho dato prima mantiene
semplicemente la finestra normale se era stata chiusa normalmente oppure
massimizzata se era stata chiusa massimizzata!!
Chiunque voglia aiutarmi mi faccia sapere. (potete scrivermi anche su
gianni...@tin.it
)
Grazie e ciao
Gianni Maiori - Cagliari

massimizzata se era stata chiusa massimizzata!!
Se non ricordo male (il post l'ho eliminato) volevi aprire una finestra di IE senza alcuna pagina
visualizzata e senza sapere il percorso, giusto? Se č cosě, allora il modo piů semplice č:
Shell "start explorer.exe about:blank"
Puoi anche utilizzare l'API ShellEXecute, cosě non hai problemi di compatibilitŕ con i sistemi NT
(nei quali il comando "start" ha sintassi differente")
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------



Gianni Maiori - Cagliari
Ho trovato solo questa soluzione (che però funziona solo con IE)
in soluzione (1)
' Se vuoi il Theatre-mode --> .FullScreen = True
Call ShowWindow(TheBrowser.hwnd, SW_SHOWMAXIMIZED)
Ciao



Se non ricordo male (il post l'ho eliminato) volevi aprire una finestra di IE senza alcuna pagina
Ricordi male: ha detto il browser non IE! :-)
Questo mi ricorda un vecchissimo post sul come attivare il Browser sia
sotto windows che NT!
Ciao
Remove CUTME from E-Mail address to reply!
Visit Hardware Tips: 
http://www.hardwaretips.com