Page 1 sur 1
[R] Interface GUI / Internet Explorer
Posté : jeu. 23 août 2007 14:38
par toonsgy
Salutation
Mon projet et de creer un system d'automatisation d'action sur certain pages internets...
pour plus de faciliter je voudrai que le programme affiche dans un GUI la pajes internet pour ne pas avoir un GUI où sont les boutton et une pasge Internet explorer à coté quelqu'un à t-il un code déjà prét...
un system du genre exist deja avec Ultimate autoit srcipt collection mais je n'arrive pas à l'adapter...
merci d'avance
Posté : jeu. 23 août 2007 20:38
par sylvanie
Bonsoir,
voici un exple :
Code : Tout sélectionner
#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: [url=http://msdn.microsoft.com/workshop/browser...netexplorer.asp]http://msdn.microsoft.com/workshop/browser...netexplorer.asp[/url]
$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://autoitscript.olympe-network.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://autoitscript.olympe-network.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
Posté : jeu. 23 août 2007 21:34
par Tlem
Vraiment, Vraiment trop gentil ce Sylvanie !!!
Posté : jeu. 23 août 2007 21:46
par sylvanie
bah là sur le coups, c'est du réchauffé ressorti tout droit d'une archive , j'ai juste chanhé l'url
Posté : jeu. 23 août 2007 23:40
par Tlem
Posté : mar. 28 août 2007 12:01
par toonsgy
C'est super !!!
C'est exactement se qui me fau
Merci à tous les gens