Hallo alle zusammen,
ich versuche die ganze zeit den bereich zwichen <title> und </title> auszulesen und als Fenster Titel für mein Gui zu verwenden.
In der SuFu hab ich nichts gefunden.
Thx im voraus
Hallo alle zusammen,
ich versuche die ganze zeit den bereich zwichen <title> und </title> auszulesen und als Fenster Titel für mein Gui zu verwenden.
In der SuFu hab ich nichts gefunden.
Thx im voraus
_StringBetween sollte reichen, perfekt wäre ein RegEx, der auch auf umliegendes <head></head> achten könnte.
peethebee
THx für die schnelle antwort
aber wie soll ich dem _StringBetween verklickern in welchem html formular er suchen soll??
das siet jetzt so aus:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
$oIE=_IECreateEmbedded()
[/autoit][autoit][/autoit][autoit]#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate(""&_StringBetween("?","<title>","</title>") , 625, 445, 221, 135)
$Obj= GUICtrlCreateObj($oIE,-1,-1,625,445)
GUISetState(@SW_SHOW)
_IENavigate($oIE,"http://www.google.de")
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Zitatich versuche die ganze zeit den bereich zwichen <title> und </title> auszulesen und als Fenster Titel für mein Gui zu verwenden.
Zitataber wie soll ich dem _StringBetween verklickern in welchem html formular er suchen soll??
Ich kann dir nur schwer folgen^^.
Gibt doch _IE_XXX-Funktionen, um den Quelltext des IE-Objektes auszulesen, oder?
peethebee
ich will halt nen browser machen später dann noch für nen chat
da soll halt als Fenstertitel der Titel der Seite.
Ich hab da ein Embeddet in meinem Gui und von da Soll der Titel ausgelsen werden ich weiß halt nicht wie ich dem _StringBetween halt sagen soll das er das aus dem Embeddet lesen soll.
Naja mir fällt da nur die inet funktion ein. Aber die kostet halt Zeit und zwar ziemlich viel :E.
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <String.au3>
#include <iNet.au3>
$oIE=_IECreateEmbedded()
$titel = _StringBetween(_INetGetSource("http://www.google.de"),"<title>","</title>")
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate($titel[0], 625, 445, 221, 135)
$Obj= GUICtrlCreateObj($oIE,-1,-1,625,445)
GUISetState(@SW_SHOW)
_IENavigate($oIE,"http://www.google.de")
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Ob das Zeit spart xD?
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <String.au3>
#include <iNet.au3>
$oIE=_IECreateEmbedded()
[/autoit] [autoit][/autoit] [autoit]#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Loading ...", 625, 445, 221, 135)
$Obj= GUICtrlCreateObj($oIE,-1,-1,625,445)
GUISetState(@SW_SHOW)
_IENavigate($oIE,"http://www.google.de")
#EndRegion ### END Koda GUI section ###
AdlibEnable("_winsettitle")
[/autoit] [autoit][/autoit] [autoit]While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func _winsettitle()
$titel = _StringBetween(_INetGetSource("http://www.google.de"),"<title>","</title>")
WinSetTitle("Loading ...", "", $titel[0])
AdlibDisable()
EndFunc
kann man des auch so machen das des immer aktuell bleibt?
weil wenn ein neuer user in den chat kommt wird an den namen ein "#" drangehängt und genau dann soll eine msgbox kommen wo steht das jemand on ist.
Versuch's mal damit:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
$oIE = _IECreateEmbedded()
[/autoit] [autoit][/autoit] [autoit]$Title = "MyGUI"
$Form1 = GUICreate($Title, 625, 445, 221, 135)
$Obj= GUICtrlCreateObj($oIE, -1, -1, 625, 445)
_IENavigate($oIE, "http://www.google.de")
$NewTitle = _IEPropertyGet($oIE, "title")
WinSetTitle($Title, "", $NewTitle)
$Title = $NewTitle
$check = _IEPropertyGet($oIE, "locationurl")
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
If $check <> _IEPropertyGet($oIE, "locationurl") Then
$check = _IEPropertyGet($oIE, "locationurl")
$NewTitle = _IEPropertyGet($oIE, "title")
WinSetTitle($Title, "", $NewTitle)
$Title = $NewTitle
EndIf
WEnd
Edit: So wird der Titel aktualisiert, wenn eine neue Seite geladen wurde.