wie realisiere ich eine einen HTTP Post

  • bräuchte mal kurze hilfe bei der umsetztung eines html codes nach AutoIt

    folgenden code habe ich im HTML

    PHP
    <form action="../cgi-bin/webcm/"   ...>
    ...
    <input type="Password" name="login:command/response" value="response">
    </form>

    wie packt man diese zeilen in AutoIt Script code ?

    grüße
    Pre

  • Grüße dich!

    Was möchtest du tun? Da etwas ferngesteuert rein schreiben? Schau dir bitte die _IE-Funktionen an.

    Ein eigenes Passwort-Input erstellen? Dann schaue dir bitte GUICtrlCreate_Input an.

    Gruß,
    Matthias

  • Hallo habe dir mal eine Incl. File angehängt darin sind einige UDFs unter anderem auch httppost()

    Kann es sein das du versuchst dich an ein Fritz!box zu hängen? (https://autoit.de/index.php?page…ght=#post109152 )

    da ist was fertig hier im Forum.

  • Hallo habe dir mal eine Incl. File angehängt darin sind einige UDFs unter anderem auch httppost()

    Kann es sein das du versuchst dich an ein Fritz!box zu hängen? (https://autoit.de/index.php?page…ght=#post109152 )

    da ist was fertig hier im Forum.

    ja ich versuche meine eigene fritzbox zu "hängen", das fertige hier im forum habe ich auch schon gesehen, ist aber nicht so schön gelöst bzw, würde ich das gerne anderst versuchen. resultierend aus dem beitrag habe ich mir diese funktion abgeleitet :#

    Spoiler anzeigen
    [autoit]

    Func _fritzboxgetsid($sresponse)
    $POSTDATA = "login:command/response=" & $sresponse & "&getpage=../html/de/menus/menu2.html"
    $httpsocet = _HTTPConnect($fritzboxnameorip)
    $RC = _HTTPPost($fritzboxnameorip, "http://" & $fritzboxnameorip & "/cgi-bin/webcm", $httpsocet, $POSTDATA)
    Sleep(1000)
    $RC = _HTTPRead($httpsocet, 0)
    $SID = StringRegExp($RC, '[nNaAmMeE]+="[sSiIdD]+"\s*[vVaAlLuUeE]+\s*=\s*"(.*)"\s+', 1)
    $SID = $SID[0]
    Return $SID
    EndFunc ;==>_fritzboxgetsid

    [/autoit]

    jedoch dachte ich das via object lösen zu können, schlug aber bisher fehl. Jemand eine Idee ?

    mein versuch hierzu sah so aus:

    Spoiler anzeigen
    [autoit]

    Func _fritzboxgetsid($sresponse)
    $POSTDATA = "login:command/response=" & $sresponse & "&getpage=../html/de/menus/menu2.html"
    $oHTTP = ObjCreate("winhttp.winhttprequest.5.1")
    $oHTTP.open("PUT","http://"&$fritzboxnameorip&"/cgi-bin/webcm",false)
    $oHTTP.send($POSTDATA)
    $RC= $oHTTP.responseText
    $SID = StringRegExp($RC, '[nNaAmMeE]+="[sSiIdD]+"\s*[vVaAlLuUeE]+\s*=\s*"(.*)"\s+', 1)
    $SID = $SID[0]
    Return $SID
    EndFunc

    [/autoit]

    aber irgentwie schein da noch was dran verkehrt zu sein ?
    Jemand ne idee

    Gruß Pre

  • Hi,
    probier mal das:

    [autoit]

    $oWinHTTP = ObjCreate("winhttp.winhttprequest.5.1")
    Func EasyPost($sAddr, $sPost)
    $oWinHTTP.Open("POST", $sAddr, False)
    $oWinHTTP.SetRequestHeader("User-Agent", "Mozilla/5.0 (Windows; U; Windows NT 6.1; en-US; rv:1.9.0.10) Gecko/2009042316 Firefox/3.0.10 (.NET CLR 4.0.20506)")
    $oWinHTTP.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded")
    $oWinHTTP.Send($sPost)
    Return $oWinHTTP.ResponseText
    EndFunc ;==>EasyPost

    [/autoit]