Ticket #110: test code only5.au3

File test code only5.au3, 727 bytes (added by Starbug, 17 years ago)

.AU3 file for the code posted above

Line 
1#include <GUIConstantsEx.au3>
2$IE1 = ObjCreate("Shell.Explorer.2")
3$IE2 = ObjCreate("Shell.Explorer.2")
4
5Opt("GUIOnEventMode", 1)
6#Region ### START Koda GUI section ### Form=
7$Form2 = GUICreate("Form2", 908, 523, 195, 157, BitOR($WS_MINIMIZEBOX,$WS_SYSMENU,$WS_CAPTION,$WS_CLIPCHILDREN,$WS_POPUP,$WS_POPUPWINDOW,$WS_GROUP,$WS_BORDER,$WS_CLIPSIBLINGS))
8GUISetOnEvent($GUI_EVENT_CLOSE, "Form2Close")
9$IE1_GUI = GUICtrlCreateObj($IE1, 8, 8, 452, 508)
10$IE2_GUI = GUICtrlCreateObj($IE2, 464, 8, 436, 508)
11GUISetState(@SW_SHOW)
12#EndRegion ### END Koda GUI section ###
13$IE1.navigate2("http://www.google.com.au")
14$IE2.navigate2("http://www.yahoo.com/")
15
16While 1
17        Sleep(100)
18WEnd
19
20Func Form2Close()
21Exit
22EndFunc
23