本帖最后由 病毒专收员 于 2011-3-24 14:47 编辑
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <INet.au3>
#include <IE.au3>
_IEErrorHandlerRegister ()
$oIE = _IECreateEmbedded ()
GUICreate("", 551, 581, _
(@DesktopWidth - 551) / 2, (@DesktopHeight - 581) / 2, _
$WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN)
$GUIActiveX = GUICtrlCreateObj($oIE, 0, 0, 549, 347) ;, 0, 0, 549, 347) 10, 40, 600, 360
$GUI_Button_Back = GUICtrlCreateButton("Back", 2, 356, 100, 30)
$GUI_Button_Forward = GUICtrlCreateButton("Forward", 112, 356, 100, 30)
$GUI_Button_Home = GUICtrlCreateButton("Home", 222, 356, 100, 30)
$GUI_Button_Stop = GUICtrlCreateButton("Stop", 332, 356, 100, 30)
GUISetState() ;Show GUI
_IENavigate ($oIE, "www.autoitx.com")
; Waiting for user to close the window
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $GUI_Button_Home
_IENavigate ($oIE, "www.autoitx.com")
Case $msg = $GUI_Button_Back
_IEAction ($oIE, "back")
Case $msg = $GUI_Button_Forward
_IEAction ($oIE, "forward")
Case $msg = $GUI_Button_Stop
_IEAction ($oIE, "stop")
EndSelect
WEnd
GUIDelete()
Exit
|