Und zwar geht Variante 1meine frage ist es bei Variante 2
Test ie ohne Tab das ich da den Quellcode aus den ie holen kann geht .
Variante 1
Spoiler anzeigen
#include <GUIConstants.au3>
#include <IE.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Test ie ohne Tab", 629, 422, 656, 495)
GUISetBkColor(0xFFFFFF)
$Input1 = GUICtrlCreateInput("", 8, 8, 281, 21)
$Button1 = GUICtrlCreateButton("Okay", 304, 8, 75, 25, 0)
$ie = _IECreateEmbedded()
$Group1 = GUICtrlCreateObj($ie,8, 64, 609, 337)
GUICtrlSetFont($Group1, 8, 400, 0, "MS Sans Serif")
$Button2 = GUICtrlCreateButton("Quellcode anzeigen", 392, 8, 125, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_IENavigate($ie,GUICtrlRead($Input1),0)
Case $Button2
$sHTML = _IEDocReadHTML ($ie)
MsgBox(0, "Quelltext", $sHTML)
EndSwitch
WEnd
test ie mit tab das ich da den Quellcode aus den ie holen kann geht nicht
nur wenn ich die seite oben im Input reingeschrieben habe dann kann ich den Quellcode auslessen aber das ist nicht das was ich gerne haben will
ich will das wenn eine seite eingeben wurde also zum beispiel https://autoit.de/www.google.de das erst der tab kommt und dann wenn ich den quellcode von der seite und den tab sehen will das ich den dann erst auslesen lasse wenn ich diesen tab auch gedrückt habe
Variante 2
Spoiler anzeigen
#include <GUIConstants.au3>
#include <GuiTab.au3>
#include <Array.au3>
#include <Ie.au3>
#include <INet.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Test ie mit Tab", 629, 422, 656, 495)
GUISetBkColor(0xFFFFFF)
$Input1 = GUICtrlCreateInput("", 8, 8, 281, 21)
$Button1 = GUICtrlCreateButton("Button1", 304, 8, 75, 25, 0)
$Tab = GUICtrlCreateTab (0, 35, @DesktopWidth -15, 25)
$Button2 = GUICtrlCreateButton("Quellcode anzeigen", 392, 8, 125, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Dim $ie[1],$Obj[1]
_ArrayAdd ($ie,_IECreateEmbedded())
_ArrayAdd ($ie,_IEErrorHandlerRegister ())
_NewTab("www.google.de")
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_NewTab(GUICtrlRead ($Input1))
Case $Button2
$sHtml = _INetGetSource (GUICtrlRead ($Input1))
MsgBox(0, "", $sHtml)
EndSwitch
WEnd
Func _NewTab($sText)
GUICtrlCreateTabItem ($sText)
_ArrayAdd ($ie ,_IECreateEmbedded())
_ArrayAdd ($Obj,GUICtrlCreateObj($ie[UBound ($ie) -1], 8, 64, 609, 337))
GUICtrlSetResizing ( -1, 802)
_IENavigate($ie[UBound ($ie) -1],$sText,0)
_GUICtrlTab_SetCurSel($Tab, _GUICtrlTab_GetItemCount($Tab) -1)
EndFunc
Func _Close()
Local $Zahl = _GUICtrlTab_GetCurSel($Tab)
If $Zahl > -1 Then
_GUICtrlTab_DeleteItem($Tab, $Zahl)
GUICtrlDelete ($Obj[$Zahl +1])
_GUICtrlTab_SetCurSel($Tab, _GUICtrlTab_GetItemCount($Tab) -1)
EndIf
EndFunc