Jump to content

prog


Recommended Posts

i wanna open 2 programms, iam expirimenting with 2 inet explorers.

i wanna make one programme with all my programmes in it, but i dont wanna let the programmes start every time sow i created 2 objects for 2 inet explorers.

if i click on the button back then $oIE1 overlaps $oIE, but the problem is that i cant use $oIE1.

mabay $oIE needs to be hided dunno how to do that.

#include <GUIConstants.au3>
#include <Date.au3>
$oIE = ObjCreate("Shell.Explorer.2")
$oIE1 = ObjCreate("Shell.Explorer.2")

 
 
GUICreate ("24 Help", @DesktopWidth, @DesktopHeight, 0, 0, $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$GUIActiveX         = GUICtrlCreateObj      ( $oIE,      10, 40 ,  @DesktopHeight, @DesktopWidth)
$GUIActiveX1         = GUICtrlCreateObj      ( $oIE1,      10, 40 ,  @DesktopHeight, @DesktopWidth)
$GUI_Button_Back    = GuiCtrlCreateButton   ("Back",     205, 3, 100,  30)
$GUI_Button_Forward = GuiCtrlCreateButton   ("Forward", 305, 3, 100,  30)
$GUI_Button_Home    = GuiCtrlCreateButton   ("Home",    405, 3, 100,  30)
$GUI_Button_Stop    = GuiCtrlCreateButton   ("Stop",    505, 3, 100,  30)
GUICtrlCreateDate (@YEAR&"/"&@MON&"/"&@MDAY, 5,10,185,20 )
 

GUISetState ()
$oIE.navigate("www.google.nl")
While 1
    $msg = GUIGetMsg()
    
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
            
            
        Case $msg = $GUI_Button_Home
            $oIE.navigate("http://www.google.nl")
            
            
        Case $msg = $GUI_Button_Back
            $oIE1.navigate("www.lycos.nl")
        Case $msg = $GUI_Button_Forward
            $oIE.GoForward
        Case $msg = $GUI_Button_Stop
            $oIE.Stop
    EndSelect
    
Wend
GUIDelete ()
Exit
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...