Link aus IE objekt auslesen

[autoit]

;## copyright by jiyan006 ¦ [email='jiyan006@msn.com'][/email] ¦ J-IT / J-Soft ##;

[/autoit] [autoit][/autoit] [autoit]

#include <GuiConstants.au3> ;Das Include für die GUI Variablen
#include <WindowsConstants.au3> ; Noch ein Include für mehr Gui Variablen
#include <IE.au3> ;Das Include für die IE Funktionen

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$oIE = _IECreateEmbedded() ;Das ist das IE objekt also du brauch keinen eigenen script füt die ganzen html und java scripts
;Es wird so zusagen ein IE BRowser im GUI erstellt das du designt hast (GUI = Gaphikal User Interface

$Gui = GUICreate("My Browser",600,600,(@DesktopWidth - 469) / 2, (@DesktopHeight - 639) / 2 ,$WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS) ; Das Fenster
; Du kannst es deinen Wünchen nach anpassen
$Back = GUICtrlCreateButton("Zurück",10,5,60,20) ; Der Zurück Button
$For = GUICtrlCreateButton("Vor",80,5,60,20) ; Der Vor Button

[/autoit] [autoit][/autoit] [autoit]

$Link = GUICtrlCreateInput("http://www.google.de",160,5,300,20) ; Das Input für den Link
$go = GUICtrlCreateButton("GO!",480,5,50,20) ; Der Los Button für den Link

[/autoit] [autoit][/autoit] [autoit]

$Obj = GUICtrlCreateObj($oIE,0,30,600,570) ; Da kommt dann Das IE objekt rein
GuiCtrlSetResizing($obj,$GUI_DOCKAUTO) ; Damit das Objekt auch mit dem Fenster wächst und schrumpft

[/autoit] [autoit][/autoit] [autoit]

GUISetState() ; Diese Funktion sorgt dafür das unser Fenster mit seinen Funktionen auch angezeigt wird

[/autoit] [autoit][/autoit] [autoit]

_IENavigate($oIE,"http://ww.google.de") ; Die erste Seite zu die IE navigieren sol bzw. die Startseite

[/autoit] [autoit][/autoit] [autoit]

;;;;Weitere Funktionen wie Favorieten und Suche und Satartseite usw. mach ich späte noch rein und Design auch;;;;; nur steht das dann unter meinem copyright ;P

[/autoit] [autoit][/autoit] [autoit]

;## Jetzt kommen die Funktionen ##;

[/autoit] [autoit][/autoit] [autoit]

While 1 ; While steht dafür das jede millisekunde überfrüft wird ob eine der Buttons betätigt wurde

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Switch GUIGetMsg() ; Check ob etwas betätigt wurde
case $Back ; Das passiert wenn der Backbutton betätigt wird
_IEAction($oIE,"back") ; IE navigiert zurück

[/autoit] [autoit][/autoit] [autoit]

case $For ; Das passiert wenn der For Button betätigt wird
_IEAction($oIE,"forward") ; IE navigiert for

[/autoit] [autoit][/autoit] [autoit]

case $go ; Das passiert wenn der GO! Button betätigt wird
_IENavigate($oIE,guictrlread($Link)) ; IE naaviegiert zu dem Link der aus dem Input asgelesen wurde

[/autoit] [autoit][/autoit] [autoit]

case $GUI_EVENT_CLOSE ; Das passiert wenn der ExitButton geklickt wird
ExitLoop ; Die Anwendung wird geschlossen

[/autoit] [autoit][/autoit] [autoit]

EndSwitch ; Hier geht die kontrolle zuende so das sie wieder von neu anfängt

[/autoit] [autoit][/autoit] [autoit]

WEnd ; Hier geht die überfrüfung zuende so das sie wieder von neu anfängt

[/autoit] [autoit][/autoit] [autoit]

;## Script Ende ##;

[/autoit]