Daten / Werte aus Feldern ( innertext ) auslesen

  • Hallo ,

    Ich versuche mich schon wieder mal eine ganze Zeit lang damit herauszufinden wie man Daten die man mit Hilfe von Au3Info nicht erreichen kann auf eine andere Art und Weise greifbar zu machen.
    In der Hilfe von Autoit finden man zum Thema innertext nur Beispiele für den IE. Dort hab ich dann ein wenig gestöbert und bin dann auf das hier gestossen:

    Spoiler anzeigen
    [autoit]

    $oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
    $oHTTP.Open("GET","http://www.AutoIt.de")
    $oHTTP.Send()
    $HTMLSource = $oHTTP.Responsetext

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

    msgbox(0,"" , $HTMLSource)

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

    Das wäre ja genau das was ich bräuchte um in manchen Programmen Werte zu erfassen.
    Zb. wenn man eine Softwareinstallation automatisiert, kommt es vor das man bestimmte Fenster
    nicht erreichen kann.
    Kann mir da jemand vieleicht mit einen kleinen Beispiel oder Tip auf die Sprünge helfen.
    Das wäre nett.

    Grus Jan

  • Ja kann ich... wenn auch ein wenig späte :)


    zB: dieses hier. Hier werden in dem zuvor installierten OpenOffice Org noch Einstellungen vorgenommen.
    Und diese mache ich zZ per Send() weil ich es anders nicht hinbekomme.
    Jetzt würde mich aber schon interessieren ob das auch anders machbar wäre.
    Also zB ein Klick auf die Links bzw Combofelder.

    Gruß Jan

    Spoiler anzeigen
    [autoit]

    ; Einstellungen im Open Office Org damit man die daten im Microsoft Office öffnen kann.

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

    $Time=600
    $SoftName= @ProgramFilesDir & "\OpenOffice.org 3\program\swriter.exe"

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

    ShellExecute($SoftName)
    If @error Then Exit(1)
    ConsoleWrite("ShellExecute" & @CRLF)

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

    $Schleife = 0
    While 1

    Local $WinWait=WinWait("Unbenannt 1 - OpenOffice.org Writer", "", 5)

    If $WinWait == 0 Then
    $Schleife = $Schleife +1

    ElseIf $WinWait == 1 Then
    ExitLoop

    EndIf

    If $Schleife == 5 Then Exit(1)

    WEnd

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

    Send("{ALT}+x")
    ConsoleWrite("Send X" & @CRLF)
    Sleep($Time)

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

    Send("o")
    ConsoleWrite("Send O" & @CRLF)
    Sleep($Time)

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

    Send("{PGUP 2}")
    Sleep($Time)

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

    Send("{LEFT 2}")
    Sleep($Time)

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

    Send("{DOWN}")
    Sleep($Time)

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

    Send("{LEFT 2}")
    Sleep($Time)

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

    Send("{RIGHT}")
    Sleep($Time)

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

    Send("{DOWN}")
    Sleep($Time)

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

    send("!D")
    Sleep($Time)

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

    Send("{PGUP 2}") ; Bildauftaste 2 mal
    Sleep($Time)

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

    Send("t")
    Sleep($Time)

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

    Send("{TAB}")
    Sleep($Time)

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

    Send("{PGUP 5}")
    Sleep($Time)

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

    Send("{PGDN 4}")
    Sleep($Time)

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

    ;Send("{TAB 17}")
    send("!D")
    Sleep($Time)

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

    Send("{DOWN 3}")
    Sleep($Time)

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

    Send("{TAB}")
    Sleep($Time)

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

    Send("{PGUP 5}")
    Sleep($Time)

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

    Send("{PGDN 8}")
    Sleep($Time)

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

    send("!D")
    Sleep($Time)

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

    Send("{DOWN}")
    Sleep($Time)

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

    Send("{TAB}")
    Sleep($Time)

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

    Send("{PGUP 5}")
    Sleep($Time)

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

    Send("{TAB}")
    Sleep($Time)

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

    Send("{ENTER}")
    Sleep($Time)

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

    Send("!+{F4}")
    Sleep($Time)

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

    Exit

    [/autoit]