CsM33 Posted September 25, 2006 Posted September 25, 2006 Is there a way to make a webpage viewable through a GUI program? Lets say that I wanted to view these forums through a program called Autoit.exe I make the program, GUICreate("Autoit Website",380,300) I then make the menu, then for the main page I just want this website to show up, with clickable links that open in internet explorer.
Valuater Posted September 25, 2006 Posted September 25, 2006 (edited) see "GUICtrlCreateObj" (exactly ) in help... it has an IE in the GUI 8) Edited September 25, 2006 by Valuater
cppman Posted September 25, 2006 Posted September 25, 2006 I did'nt write this.. (From the Help File). expandcollapse popup#include <GUIConstants.au3> ; Simple example: Embedding an Internet Explorer Object inside an AutoIt GUI ; ; The full example is available in the test\ActiveX directory (TestXInternet.au3) ; ; See also: http://msdn.microsoft.com/workshop/browser/webbrowser/reference/objects/internetexplorer.asp $oIE = ObjCreate("Shell.Explorer.2") ; Create a simple GUI for our output GUICreate ( "Embedded Web control Test", 640, 580,(@DesktopWidth-640)/2, (@DesktopHeight-580)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) $GUIActiveX = GUICtrlCreateObj ( $oIE, 10, 40 , 600 , 360 ) $GUI_Button_Back = GuiCtrlCreateButton ("Back", 10, 420, 100, 30) $GUI_Button_Forward = GuiCtrlCreateButton ("Forward", 120, 420, 100, 30) $GUI_Button_Home = GuiCtrlCreateButton ("Home", 230, 420, 100, 30) $GUI_Button_Stop = GuiCtrlCreateButton ("Stop", 330, 420, 100, 30) GUISetState () ;Show GUI $oIE.navigate("http://www.autoitscript.com") ; Waiting for user to close the window While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $GUI_Button_Home $oIE.navigate("http://www.autoitscript.com") Case $msg = $GUI_Button_Back $oIE.GoBack Case $msg = $GUI_Button_Forward $oIE.GoForward Case $msg = $GUI_Button_Stop $oIE.Stop EndSelect Wend GUIDelete () Exit Miva OS Project
CsM33 Posted September 25, 2006 Author Posted September 25, 2006 I did'nt write this.. (From the Help File). expandcollapse popup#include <GUIConstants.au3> ; Simple example: Embedding an Internet Explorer Object inside an AutoIt GUI ; ; The full example is available in the test\ActiveX directory (TestXInternet.au3) ; ; See also: http://msdn.microsoft.com/workshop/browser/webbrowser/reference/objects/internetexplorer.asp $oIE = ObjCreate("Shell.Explorer.2") ; Create a simple GUI for our output GUICreate ( "Embedded Web control Test", 640, 580,(@DesktopWidth-640)/2, (@DesktopHeight-580)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) $GUIActiveX = GUICtrlCreateObj ( $oIE, 10, 40 , 600 , 360 ) $GUI_Button_Back = GuiCtrlCreateButton ("Back", 10, 420, 100, 30) $GUI_Button_Forward = GuiCtrlCreateButton ("Forward", 120, 420, 100, 30) $GUI_Button_Home = GuiCtrlCreateButton ("Home", 230, 420, 100, 30) $GUI_Button_Stop = GuiCtrlCreateButton ("Stop", 330, 420, 100, 30) GUISetState () ;Show GUI $oIE.navigate("http://www.autoitscript.com") ; Waiting for user to close the window While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop Case $msg = $GUI_Button_Home $oIE.navigate("http://www.autoitscript.com") Case $msg = $GUI_Button_Back $oIE.GoBack Case $msg = $GUI_Button_Forward $oIE.GoForward Case $msg = $GUI_Button_Stop $oIE.Stop EndSelect Wend GUIDelete () Exit THANK YOU
AceLoc Posted September 25, 2006 Posted September 25, 2006 THANK YOUThanks the helpfile. [quote name='AceLoc']I gots new sunglasses there cool.[/quote]
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now