#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt('MustDeclareVars', 1)
Example()
Func Example()
Local $oIE, $GUIActiveX, $GUI_Button_Back, $GUI_Button_Forward, $Go
Local $GUI_Button_Home, $GUI_Button_Stop, $nMsg, $Form, $Group1, $Input1
$oIE = ObjCreate("Shell.Explorer.2")
#Region ### START Koda GUI section ### Form=
$Form = GUICreate("Embedded Web control Test", 695, 542, Default, Default, BitOR($GUI_SS_DEFAULT_GUI,$WS_MAXIMIZEBOX,$WS_SIZEBOX,$WS_THICKFRAME,$WS_TABSTOP))
$GUIActiveX = GUICtrlCreateObj($oIE, 10, 10, 675, 400)
$Group1 = GUICtrlCreateGroup("Control", 119, 432, 457, 97)
$Input1 = GUICtrlCreateInput("", 135, 488, 352, 21)
$Go = GUICtrlCreateButton("Go", 502, 488, 58, 26)
$GUI_Button_Back = GUICtrlCreateButton("Back", 132, 448, 100, 30)
$GUI_Button_Forward = GUICtrlCreateButton("Forward", 242, 448, 100, 30)
$GUI_Button_Stop = GUICtrlCreateButton("Stop", 460, 448, 100, 30)
$GUI_Button_Home = GUICtrlCreateButton("Home", 352, 448, 100, 30)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$oIE.navigate("http://www.autoitscript.com")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ExitLoop
Case $GUI_Button_Home
$oIE.navigate("http://www.autoitscript.com")
Case $GUI_Button_Back
$oIE.GoBack
Case $GUI_Button_Forward
$oIE.GoForward
Case $GUI_Button_Stop
$oIE.Stop
Case $Go
$oIE.navigate(GUICtrlRead($Input1))
EndSwitch
WEnd
GUIDelete()
EndFunc ;==>Example