Wie bekomme ich die Zeit?

  • <img style="width: 15.7301px;" id="balken" src="http://schönes.gif" align="left" height="29" width="1">
    <div id="balkentext">25:07</div>

    Wie kann ich diese Zeit im IE auslesen? Irgentwie über den Balkentext, aber ich weiß nicht wie ich an die variable komme.
    Mit _IEFormElementGetValue() geht nicht. Der Typ passt nicht.

  • Ich hab was anderes ... vll hilft es dir weiter ;)

    Spoiler anzeigen
    [autoit]

    #include <GDIPlus.au3>
    #include <WinAPI.au3>
    #include <GuiConstantsEx.au3>

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

    Opt("MustDeclareVars", 1)

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

    ; ===============================================================================================================================
    ; Description ...: Simple clock using layered windows
    ; Author ........: Paul Campbell (PaulIA)
    ; Notes .........:
    ; ===============================================================================================================================

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

    ; ===============================================================================================================================
    ; Global constants
    ; ===============================================================================================================================

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

    Global Const $iCenter = 200
    Global Const $iDotOpacity = 250
    Global Const $iHourRad = 140
    Global Const $iMinRad = 200
    Global Const $iOpacity = 128
    Global Const $nPI = 3.1415926535897932384626433832795
    Global Const $iRadius = 200
    Global Const $iSecRad = 200
    Global Const $iTickLen = 0.02

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

    Global Const $AC_SRC_ALPHA = 1
    Global Const $ULW_ALPHA = 2

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

    Global Enum $eScrDC=0, $eMemDC, $eBitmap, $eWidth, $eHeight, $eGraphic, $ePen, $eCap, $eBrush, $eFormat, $eFamily, $eFont, $eLayout, $eLast

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

    ; ===============================================================================================================================
    ; Global variables
    ; ===============================================================================================================================

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

    Global $hDial, $hTime, $hHour, $hMin, $hSec, $hDot, $aTime, $aHour, $aMin, $aSec, $aCurr[3][2], $aLast[3][2]

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

    ; ===============================================================================================================================
    ; Main
    ; ===============================================================================================================================

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

    ClockInit()
    DialDraw ()
    Draw ()
    DotDraw ()
    ClockLoop()
    ClockDone()

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

    ; ===============================================================================================================================
    ; Finalize clock
    ; ===============================================================================================================================
    Func ClockDone()
    ; Finalize GDI+ resources
    TimeDone()
    HourDone()
    MinDone ()
    SecDone ()

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

    ; Finalize GDI+ library
    _GDIPlus_Shutdown()
    EndFunc

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

    ; ===============================================================================================================================
    ; Initialize clock
    ; ===============================================================================================================================
    Func ClockInit()
    Local $iX, $iY

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

    ; Calculate the dial frame caption size
    $iX = -(_WinAPI_GetSystemMetrics($SM_CXFRAME))
    $iY = -(_WinAPI_GetSystemMetrics($SM_CYCAPTION) + _WinAPI_GetSystemMetrics($SM_CYFRAME))

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

    ; Allocate the window resources
    $hDial = GUICreate("Clock", $iRadius * 2, $iRadius * 2, -1, -1, 0, BitOR($WS_EX_LAYERED, $WS_EX_TOPMOST))
    GUISetState()
    $hTime = GUICreate("Time" , $iRadius * 2, $iRadius * 2, $iX, $iY, 0, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $hDial)
    GUISetState()
    $hHour = GUICreate("Hour" , $iRadius * 2, $iRadius * 2, $iX, $iY, 0, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $hDial)
    GUISetState()
    $hMin = GUICreate("Min" , $iRadius * 2, $iRadius * 2, $iX, $iY, 0, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $hDial)
    GUISetState()
    $hSec = GUICreate("Sec" , $iRadius * 2, $iRadius * 2, $iX, $iY, 0, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $hDial)
    GUISetState()
    $hDot = GUICreate("Dot" , $iRadius * 2, $iRadius * 2, $iX, $iY, 0, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $hDial)
    GUISetState()

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

    ; Initialize GDI+ library
    _GDIPlus_Startup()

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

    ; Initialize GDI+ resources
    TimeInit()
    HourInit()
    MinInit ()
    SecInit ()

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

    ; Hook non client hit test message so we can move the clock
    GUIRegisterMsg($WM_NCHITTEST, "WM_NCHITTEST")
    EndFunc

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

    ; ===============================================================================================================================
    ; Loop until user exits
    ; ===============================================================================================================================
    Func ClockLoop()
    do
    Draw()
    until GUIGetMsg() = $GUI_EVENT_CLOSE
    EndFunc

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

    ; ===============================================================================================================================
    ; Draw the center dot
    ; ===============================================================================================================================
    Func DotDraw()
    Local $aDot

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

    $aDot = ResourceInit($iRadius * 2, $iRadius * 2)
    _GDIPlus_GraphicsFillEllipse($aDot[$eGraphic], $iRadius-10, $iRadius-10, 20, 20)
    ResourceSet ($hDot, $aDot, $iDotOpacity)
    ResourceDone($aDot)
    EndFunc

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

    ; ===============================================================================================================================
    ; Draw the clock elements
    ; ===============================================================================================================================
    Func Draw()
    ; Calculate current time element position
    $aLast = $aCurr
    $aCurr[0][0] = $iCenter + Cos(TimeToRadians("sec" )) * $iSecRad
    $aCurr[0][1] = $iCenter - Sin(TimeToRadians("sec" )) * $iSecRad
    $aCurr[1][0] = $iCenter + Cos(TimeToRadians("min" )) * $iMinRad
    $aCurr[1][1] = $iCenter - Sin(TimeToRadians("min" )) * $iMinRad
    $aCurr[2][0] = $iCenter + Cos(TimeToRadians("hour")) * $iHourRad
    $aCurr[2][1] = $iCenter - Sin(TimeToRadians("hour")) * $iHourRad

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

    ; Draw time elements
    TimeDraw()
    HourDraw()
    MinDraw ()
    SecDraw ()
    EndFunc

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

    ; ===============================================================================================================================
    ; Draw the clock dial
    ; ===============================================================================================================================
    Func DialDraw()
    Local $aDial, $hPen1, $hPen2, $iI, $iN, $iX1, $iY1, $iX2, $iY2

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

    $aDial = ResourceInit($iRadius * 2, $iRadius * 2)
    $hPen1 = _GDIPlus_PenCreate()
    $hPen2 = _GDIPlus_PenCreate(0xFF0000FF, 4)
    for $iI = 0 to 2 * $nPI Step $nPI / 30
    $iX1 = $iCenter + Cos($iI) * ($iRadius * (1.00 - $iTickLen))
    $iY1 = $iCenter - Sin($iI) * ($iRadius * (1.00 - $iTickLen))
    $iX2 = $iCenter + Cos($iI) * $iRadius
    $iY2 = $iCenter - Sin($iI) * $iRadius
    if Mod($iN, 5) = 0 then
    _GDIPlus_GraphicsDrawLine($aDial[$eGraphic], $iX1, $iY1, $iX2, $iY2, $hPen2)
    else
    _GDIPlus_GraphicsDrawLine($aDial[$eGraphic], $iX1, $iY1, $iX2, $iY2, $hPen1)
    endif
    $iN += 1
    next
    _GDIPlus_PenDispose($hPen2)
    _GDIPlus_PenDispose($hPen1)

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

    ResourceSet ($hDial, $aDial)
    ResourceDone($aDial)
    EndFunc

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

    ; ===============================================================================================================================
    ; Finalize resources for the hour hand
    ; ===============================================================================================================================
    Func HourDone()
    _GDIPlus_PenDispose($aHour[$ePen])
    _GDIPlus_ArrowCapDispose($aHour[$eCap])
    ResourceDone($aHour)
    EndFunc

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

    ; ===============================================================================================================================
    ; Draw the hour hand
    ; ===============================================================================================================================
    Func HourDraw()
    if ($aLast[2][0] = $aCurr[2][0]) and ($aLast[2][1] = $aCurr[2][1]) then Return
    _GDIPlus_GraphicsDrawLine($aHour[$eGraphic], $iCenter, $iCenter, $aCurr[2][0], $aCurr[2][1], $aHour[$ePen])
    ResourceSet($hHour, $aHour)
    EndFunc

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

    ; ===============================================================================================================================
    ; Initialize resources for the hour hand
    ; ===============================================================================================================================
    Func HourInit()
    $aHour = ResourceInit($iRadius * 2, $iRadius * 2)
    $aHour[$ePen] = _GDIPlus_PenCreate(0xFFFF00FF)
    $aHour[$eCap] = _GDIPlus_ArrowCapCreate($iHourRad / 2, 8)
    _GDIPlus_PenSetCustomEndCap($aHour[$ePen], $aHour[$eCap])
    EndFunc

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

    ; ===============================================================================================================================
    ; Finalize resources for the minute hand
    ; ===============================================================================================================================
    Func MinDone()
    _GDIPlus_PenDispose($aMin[$ePen])
    _GDIPlus_ArrowCapDispose($aMin[$eCap])
    ResourceDone($aMin)
    EndFunc

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

    ; ===============================================================================================================================
    ; Draw the minute hand
    ; ===============================================================================================================================
    Func MinDraw()
    if ($aLast[1][0] = $aCurr[1][0]) and ($aLast[1][1] = $aCurr[1][1]) then Return
    _GDIPlus_GraphicsFillRect($aMin[$eGraphic], 0, 0, $iRadius * 2, $iRadius * 2)
    _GDIPlus_GraphicsDrawLine($aMin[$eGraphic], $iCenter, $iCenter, $aCurr[1][0], $aCurr[1][1], $aMin[$ePen])
    ResourceSet($hMin, $aMin)
    EndFunc

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

    ; ===============================================================================================================================
    ; Initialize resources for the minute hand
    ; ===============================================================================================================================
    Func MinInit()
    $aMin = ResourceInit($iRadius * 2, $iRadius * 2)
    $aMin[$ePen] = _GDIPlus_PenCreate(0xFFFF0000)
    $aMin[$eCap] = _GDIPlus_ArrowCapCreate($iMinRad / 2, 8)
    _GDIPlus_PenSetCustomEndCap($aMin[$ePen], $aMin[$eCap])
    EndFunc

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

    ; ===============================================================================================================================
    ; Finalize resources for the second hand
    ; ===============================================================================================================================
    Func SecDone()
    _GDIPlus_PenDispose($aSec[$ePen])
    ResourceDone($aSec)
    EndFunc

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

    ; ===============================================================================================================================
    ; Draw the second hand
    ; ===============================================================================================================================
    Func SecDraw()
    if ($aLast[0][0] = $aCurr[0][0]) and ($aLast[0][1] = $aCurr[0][1]) then Return
    _GDIPlus_GraphicsFillRect($aSec[$eGraphic], 0, 0, $iRadius * 2, $iRadius * 2)
    _GDIPlus_GraphicsDrawLine($aSec[$eGraphic], $iCenter, $iCenter, $aCurr[0][0], $aCurr[0][1], $aSec[$ePen])
    ResourceSet($hSec, $aSec)
    EndFunc

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

    ; ===============================================================================================================================
    ; Initialize resources for the second hand
    ; ===============================================================================================================================
    Func SecInit()
    $aSec = ResourceInit($iRadius * 2, $iRadius * 2)
    $aSec[$ePen] = _GDIPlus_PenCreate(0xFF000000)
    EndFunc

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

    ; ===============================================================================================================================
    ; Finalize drawing resources
    ; ===============================================================================================================================
    Func ResourceDone(ByRef $aInfo)
    _GDIPlus_GraphicsDispose($aInfo[$eGraphic])
    _WinAPI_ReleaseDC (0, $aInfo[$eScrDC])
    _WinAPI_DeleteObject($aInfo[$eBitmap])
    _WinAPI_DeleteDC ($aInfo[$eMemDC ])
    EndFunc

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

    ; ===============================================================================================================================
    ; Initialize bitmap resources
    ; ===============================================================================================================================
    Func ResourceInit($iWidth, $iHeight)
    Local $aInfo[$eLast + 1]

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

    $aInfo[$eScrDC ] = _WinAPI_GetDC(0)
    $aInfo[$eMemDC ] = _WinAPI_CreateCompatibleDC($aInfo[$eScrDC])
    $aInfo[$eBitmap ] = _WinAPI_CreateCompatibleBitmap($aInfo[$eScrDC], $iWidth, $iHeight)
    _WinAPI_SelectObject($aInfo[$eMemDC], $aInfo[$eBitmap])
    $aInfo[$eWidth ] = $iWidth
    $aInfo[$eHeight ] = $iHeight
    $aInfo[$eGraphic] = _GDIPlus_GraphicsCreateFromHDC($aInfo[$eMemDC])
    _GDIPlus_GraphicsFillRect($aInfo[$eGraphic], 0, 0, $iRadius * 2, $iRadius * 2)
    Return $aInfo
    EndFunc

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

    ; ===============================================================================================================================
    ; Update layered window with resource information
    ; ===============================================================================================================================
    Func ResourceSet($hGUI, ByRef $aInfo, $iAlpha=-1)
    Local $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend

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

    if $iAlpha = -1 then $iAlpha = $iOpacity
    $tSize = DllStructCreate($tagSIZE)
    $pSize = DllStructGetPtr($tSize )
    DllStructSetData($tSize, "X", $aInfo[$eWidth ])
    DllStructSetData($tSize, "Y", $aInfo[$eHeight])
    $tSource = DllStructCreate($tagPOINT)
    $pSource = DllStructGetPtr($tSource)
    $tBlend = DllStructCreate($tagBLENDFUNCTION)
    $pBlend = DllStructGetPtr($tBlend )
    DllStructSetData($tBlend, "Alpha" , $iAlpha )
    DllStructSetData($tBlend, "Format", $AC_SRC_ALPHA)
    _WinAPI_UpdateLayeredWindow($hGUI, $aInfo[$eScrDC], 0, $pSize, $aInfo[$eMemDC], $pSource, 0, $pBlend, $ULW_ALPHA)
    EndFunc

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

    ; ===============================================================================================================================
    ; Finalize resources for the digital time
    ; ===============================================================================================================================
    Func TimeDone()
    _GDIPlus_FontDispose ($aTime[$eFont ])
    _GDIPlus_FontFamilyDispose ($aTime[$eFamily])
    _GDIPlus_StringFormatDispose($aTime[$eFormat])
    _GDIPlus_BrushDispose ($aTime[$eBrush ])
    ResourceDone($aTime)
    EndFunc

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

    ; ===============================================================================================================================
    ; Draw the digital time
    ; ===============================================================================================================================
    Func TimeDraw()
    Local $sString, $aSize

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

    if ($aLast[0][0] = $aCurr[0][0]) and ($aLast[0][1] = $aCurr[0][1]) then Return
    $sString = StringFormat("%02d:%02d:%02d", @HOUR, @MIN, @SEC)
    $aSize = _GDIPlus_GraphicsMeasureString($aTime[$eGraphic], $sString, $aTime[$eFont], $aTime[$eLayout], $aTime[$eFormat])
    DllStructSetData($aTime[$eLayout], "X", $iRadius - (DllStructGetData($aSize[0], "Width") / 2))
    DllStructSetData($aTime[$eLayout], "Y", $iRadius / 3)
    _GDIPlus_GraphicsFillRect($aTime[$eGraphic], 0, 0, $iRadius * 2, $iRadius * 2)
    _GDIPlus_GraphicsDrawStringEx($aTime[$eGraphic], $sString, $aTime[$eFont], $aTime[$eLayout], $aTime[$eFormat], $aTime[$eBrush])
    ResourceSet($hTime, $aTime)
    EndFunc

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

    ; ===============================================================================================================================
    ; Initialize resources for the digital time
    ; ===============================================================================================================================
    Func TimeInit()
    $aTime = ResourceInit($iRadius * 2, $iRadius * 2)
    $aTime[$eBrush ] = _GDIPlus_BrushCreateSolid(0xFF008080)
    $aTime[$eFormat] = _GDIPlus_StringFormatCreate()
    $aTime[$eFamily] = _GDIPlus_FontFamilyCreate("Arial")
    $aTime[$eFont ] = _GDIPlus_FontCreate($aTime[$eFamily], 24, 1)
    $aTime[$eLayout] = _GDIPlus_RectFCreate(0, 0, $iRadius * 2, 40)
    EndFunc

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

    ; ===============================================================================================================================
    ; Convert time value to radians
    ; ===============================================================================================================================
    Func TimeToRadians($sTimeType)
    Switch $sTimeType
    case "sec"
    Return ($nPI / 2) - (@SEC * ($nPI / 30))
    case "min"
    Return ($nPI / 2) - (@MIN * ($nPI / 30)) - (Int(@SEC / 10) * ($nPI / 180))
    case "hour"
    Return ($nPI / 2) - (@HOUR * ($nPI / 6 )) - (@MIN / 12) * ($nPI / 30)
    EndSwitch
    EndFunc

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

    ; ===============================================================================================================================
    ; Handle the WM_NCHITTEST message so our window can be dragged
    ; ===============================================================================================================================
    Func WM_NCHITTEST($hWnd, $iMsg, $iwParam, $ilParam)
    if $hWnd = $hDial then Return $HTCAPTION
    EndFunc

    [/autoit]

    MfG <-- :P

  • sry ich bin noch nicht so gut, dass sich mir aus dem code direkt erschließt was ab geht ^^
    Könntest du die für mich wichtige Funktion rausschreiben?

    bzw weiß jmd anderes Rat bei meinem Prolbem, weil das oben hilft mir nicht wirklich.
    Ich brauch halt einen Befehl der solche variablen auslesen kann.
    Andere Vorschläge nehm ich natürlich auch gern entgegen

    Einmal editiert, zuletzt von Volvox (5. September 2008 um 22:50)

  • Okay , guck es dir erst mal an

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

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

    AutoIt Version: 3.2.13.7 (beta)
    Author: myName

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

    Script Function:
    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    ; Script Start - Add your code below here

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

    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>

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

    #Region ### START Koda GUI section ### Form=
    $Tool = GUICreate("Uhrzeit", 200, 197, -1, -1)
    GUISetFont(12, 400, 2, "Monotype Corsiva")
    GUISetBkColor(0xFFFFFF)
    $Uhr1 = GUICtrlCreateInput("", 96, 92, 25, 26)
    $Uhr2 = GUICtrlCreateInput("", 28, 92, 25, 26)
    $Uhr3 = GUICtrlCreateInput("", 60, 92, 25, 26)
    $Uhrzeit = GUICtrlCreateLabel("Uhrzeit",132, 92, 50, 22)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1

    GUICtrlSetData($Uhr1,@HOUR)
    GUICtrlSetData($Uhr2,@MIN)
    GUICtrlSetData($Uhr3,@SEC)

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

    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit

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

    EndSwitch
    WEnd

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

    Ist eigentlich recht einfach hast Inputboxen (3 Stück) und vor der While Schleife (bevor alles anfängt) einfach immer Die Uhrzeit "@Hour" usw.

    MfG <-- :P

  • wenn ich das in scite kopiere um zu sehen was es macht, kommen beim start des Quellcodes 20 fehler...

  • hm, bin eigentlich zufrieden mit meiner Versioin.
    Hast du vielleicht noch eine andere Idee als diesen riesigen quellcodeklotz?

    Ich mein kannst du die Frage oben beantworten oder ist noch was unklar?
    Ich brauch nur den Befehl.

  • ok nochmal :D

    <img style="width: 15.7301px;" id="balken" src="http://schönes.gif" align="left" height="29" width="1">
    <div id="balkentext">25:07</div>

    da ist eine Zeit die im Internetexplorer runterläuft.
    25:06 25:05 usw... Jetzt will ich die auslesen.
    Irgentwie nützt mir das mit @hour @.. nicht viel.

  • Laade dir doch den Quelltext herunter unter bearbeite den String dann so, dass nur noch die Zeit übrig bleibt, welche Seite, wo steht die Uhrzeit überhaupt?


    <img style="width: 15.7301px;" id="balken" src="http://schönes.gif" align="left" height="29" width="1">
    <div id="balkentext">25:07</div>

    Ist das rote die Zeit die du auslesen willst?

  • Vll. des hier ;)

    [autoit]

    #include <array.au3>
    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <IE.au3>

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

    $oIE = _IECreate("http://www.deineseite.de", 0, 0)
    $sText = _IEBodyReadText ($oIE)
    $split = StringSplit($sText, @CRLF)
    MsgBox(0, "Body Text", ": "&@LF&$split[19])
    _ArrayDisplay($split)

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

    EDIT:

    Oder des hier

    [autoit]

    #cs ----------------------------------------------------------------------------

    AutoIt Version: 3.2.13.7 (beta)
    Author: This is my Name !!!

    Script Function:
    Template AutoIt script.

    #ce ----------------------------------------------------------------------------

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

    ; Script Start - Add your code below here

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

    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <IE.au3>

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

    ; klappt komischerweise mit 'googEL.de' :D
    $oIE = _IECreate ("www.googel.de")

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

    $hWnd = GUICreate("TEST", 500, 400)

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

    $edit = GUICtrlCreateEdit("", 10, 20, 480, 300)
    $button = GUICtrlCreateButton('Aktualisieren', 200, 340, 100, 25)

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

    GUISetState()

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

    While 1

    $msg = GUIGetMsg()

    Switch $msg

    Case $GUI_EVENT_CLOSE
    Exit
    Case $button
    Refresh($oIE)
    EndSwitch

    WEnd

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

    Func Refresh($obj)

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

    $sText = _IEBodyReadText ($obj)
    GUICtrlSetData($edit, '')
    GUICtrlSetData($edit, $sText)

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

    EndFunc

    [/autoit]