如何用 Post 提交页面

ac5474012

我想用Post 提交一个页面的用户名密码，看过几个例子但不知如何下手。请高手指教

我看了这个例子，但是完全摸不到头脑。请高手指教

$oHTTP = ObjCreate("microsoft.xmlhttp")
$oHTTP.Open("post","http://www.wansong.net/user/UserLogin.asp",false)
$oHTTP.setRequestHeader("Cache-Control", "no-cache")
$oHTTP.setRequestHeader("Content-Type","application/x-www-form-urlencoded")  
$oHTTP.setRequestHeader("Referer","http://www.wansong.net/loginframe.htm")
$oHTTP.Send("UserName=****&UserPass=****&CookieDate=30&submit=%B5%C7+%C2%BC")

目的是用于router OS的wed用户验证页面的静默登陆

已经搞定了，感谢论坛里的高手，没有他的帮助我是不可能完成的。

源码
;主体已经完成拉~

#Region --- CodeWizard generated code Start ---
;InputBox features: Title=Yes, Prompt=Yes, Default Text=No, Pwd Char=*, Mandatory
If Not IsDeclared("sInputBoxAnswer") Then Local $sInputBoxAnswer
$sInputBoxAnswer = InputBox("请输入密码"," ","","*M","-1","-1","-1","-1")
Select
        Case @Error = 0 ;OK - The string returned is valid
If $sInputBoxAnswer = 123456 Then
MsgBox(0,"","密码正确")
Else
MsgBox(0,"","密码错误")
EndIf
        Case @Error = 1 ;The Cancel button was pushed
Exit
        Case @Error = 3 ;The InputBox failed to open
Exit
EndSelect
#EndRegion --- CodeWizard generated code End ---

$oHTTP = ObjCreate("microsoft.xmlhttp")
$oHTTP.Open("post","http://192.168.7.7/login",false)
$oHTTP.setRequestHeader("Cache-Control", "no-cache")
$oHTTP.setRequestHeader("Accept-Language", "zh-cn")
$oHTTP.setRequestHeader("Content-Type","application/x-www-form-urlencoded")  
$oHTTP.setRequestHeader("Referer"," http://192.168.7.7/logout?")
$oHTTP.Send("username=123&password=123&dst=&popup=true")
$html = $oHTTP.responseText
;MsgBox(0, "密码", $html)
;msgbox(0,"",$html)
;$file = FileOpen("D:\123.txt", 1)
; 检查文件是否正常打开
;If $file = -1 Then
;    MsgBox(0, "错误", "无法打开目标文件。")
;    Exit
;EndIf
;FileWrite($file,$html)
;FileClose($file)
$aa = StringInStr($html,"hexMD5")
;MsgBox(0, "Search result:", $aa)
$aag1=$aa+8
$aad = StringMid($html, $aag1, 4)
;MsgBox(0, "从第 3 个字符开始的 2 个字符是：", $aad)
$aag2=$aa+49
$aad1 = StringMid($html, $aag2, 64)
;MsgBox(0, "从第 3 个字符开始的 2 个字符是：", $aad1)
;例子
$g=hexMD5(123,$aad,$aad1)
;MsgBox(0,"","md5加密后的值="&$g)
        ;================================================
        ;说明，你将第一次登陆后得到的数据
        ;document.sendin.password.value = hexMD5('\316' + document.login.password.value + '\337\260\314\364\350\045\027\204\315\324\050\072\200\316\222\273');
        ;中的'\316' + document.login.password.value + '\337\260\314\364\350\045\027\204\315\324\050\072\200\316\222\273'提取出来
        ;$jiamizhi1值为\316
        ;$jiamizhi2值为\337\260\314\364\350\045\027\204\315\324\050\072\200\316\222\273
        ;$mima值为你自己的密码
        ;具体见例子
Func hexMD5($mima,$jiamizhi1,$jiamizhi2)
Dim $code,$code2
$code = '0x66756E6374696F6E20736166655F61646428782C2079290D0A7B20200D0A766172206C7377203D20287820262030784646464629202B202879202620307846464646290D0A766172206D7377203D202878203E3E20313629202B202879203E3E20313629202B20286C7377203E3E203136290D0A72657475726E20286D7377203C3C20313629207C20286C7377202620307846464646290D0A7D0D0A0D0A0D0A66756E6374696F6E20726F6C286E756D2C20636E74290D0A7B0D0A202072657475726E20286E756D203C3C20636E7429207C20286E756D203E3E3E20283332202D20636E7429290D0A7D0D0A0D0A66756E6374696F6E20636D6E28712C20612C20622C20782C20732C2074290D0A7B0D0A202072657475726E20736166655F61646428726F6C28736166655F61646428736166655F61646428612C2071292C20736166655F61646428782C207429292C2073292C2062290D0A7D0D0A66756E6374696F6E20666628612C20622C20632C20642C20782C20732C2074290D0A7B0D0A202072657475726E20636D6E2828622026206329207C2028287E622920262064292C20612C20622C20782C20732C2074290D0A7D0D0A66756E6374696F6E20676728612C20622C20632C20642C20782C20732C2074290D0A7B0D0A202072657475726E20636D6E2828622026206429207C202863202620287E6429292C20612C20622C20782C20732C2074290D0A7D0D0A66756E6374696F6E20686828612C20622C20632C20642C20782C20732C2074290D0A7B0D0A202072657475726E20636D6E2862205E2063205E20642C20612C20622C20782C20732C2074290D0A7D0D0A66756E6374696F6E20696928612C20622C20632C20642C20782C20732C2074290D0A7B0D0A202072657475726E20636D6E2863205E202862207C20287E6429292C20612C20622C20782C20732C2074290D0A7D0D0A0D0A66756E6374696F6E20636F72654D44352878290D0A7B0D0A20207661722061203D2020313733323538343139330D0A20207661722062203D202D3237313733333837390D0A20207661722063203D202D313733323538343139340D0A20207661722064203D20203237313733333837380D0A0D0A2020666F722869203D20303B2069203C20782E6C656E6774683B2069202B3D203136290D0A20207B0D0A20202020766172206F6C6461203D20610D0A20202020766172206F6C6462203D20620D0A20202020766172206F6C6463203D20630D0A20202020766172206F6C6464203D20640D0A0D0A2020202061203D20666628612C20622C20632C20642C20785B692B20305D2C2037202C202D363830383736393336290D0A2020202064203D20666628642C20612C20622C20632C20785B692B20315D2C2031322C202D333839353634353836'
    $code &= '290D0A2020202063203D20666628632C20642C20612C20622C20785B692B20325D2C2031372C2020363036313035383139290D0A2020202062203D20666628622C20632C20642C20612C20785B692B20335D2C2032322C202D31303434353235333330290D0A2020202061203D20666628612C20622C20632C20642C20785B692B20345D2C2037202C202D313736343138383937290D0A2020202064203D20666628642C20612C20622C20632C20785B692B20355D2C2031322C202031323030303830343236290D0A2020202063203D20666628632C20642C20612C20622C20785B692B20365D2C2031372C202D31343733323331333431290D0A2020202062203D20666628622C20632C20642C20612C20785B692B20375D2C2032322C202D3435373035393833290D0A2020202061203D20666628612C20622C20632C20642C20785B692B20385D2C2037202C202031373730303335343136290D0A2020202064203D20666628642C20612C20622C20632C20785B692B20395D2C2031322C202D31393538343134343137290D0A2020202063203D20666628632C20642C20612C20622C20785B692B31305D2C2031372C202D3432303633290D0A2020202062203D20666628622C20632C20642C20612C20785B692B31315D2C2032322C202D31393930343034313632290D0A2020202061203D20666628612C20622C20632C20642C20785B692B31325D2C2037202C202031383034363033363832290D0A2020202064203D20666628642C20612C20622C20632C20785B692B31335D2C2031322C202D3430333431313031290D0A2020202063203D20666628632C20642C20612C20622C20785B692B31345D2C2031372C202D31353032303032323930290D0A2020202062203D20666628622C20632C20642C20612C20785B692B31355D2C2032322C202031323336353335333239290D0A0D0A2020202061203D20676728612C20622C20632C20642C20785B692B20315D2C2035202C202D313635373936353130290D0A2020202064203D20676728642C20612C20622C20632C20785B692B20365D2C2039202C202D31303639353031363332290D0A2020202063203D20676728632C20642C20612C20622C20785B692B31315D2C2031342C2020363433373137373133290D0A2020202062203D20676728622C20632C20642C20612C20785B692B20305D2C2032302C202D333733383937333032290D0A2020202061203D20676728612C20622C20632C20642C20785B692B20355D2C2035202C202D373031353538363931290D0A2020202064203D20676728642C20612C20622C20632C20785B692B31305D2C2039202C20203338303136303833290D0A2020202063203D20676728632C20642C20612C20622C20785B692B31355D2C2031342C202D'
    $code &= '363630343738333335290D0A2020202062203D20676728622C20632C20642C20612C20785B692B20345D2C2032302C202D343035353337383438290D0A2020202061203D20676728612C20622C20632C20642C20785B692B20395D2C2035202C2020353638343436343338290D0A2020202064203D20676728642C20612C20622C20632C20785B692B31345D2C2039202C202D31303139383033363930290D0A2020202063203D20676728632C20642C20612C20622C20785B692B20335D2C2031342C202D313837333633393631290D0A2020202062203D20676728622C20632C20642C20612C20785B692B20385D2C2032302C202031313633353331353031290D0A2020202061203D20676728612C20622C20632C20642C20785B692B31335D2C2035202C202D31343434363831343637290D0A2020202064203D20676728642C20612C20622C20632C20785B692B20325D2C2039202C202D3531343033373834290D0A2020202063203D20676728632C20642C20612C20622C20785B692B20375D2C2031342C202031373335333238343733290D0A2020202062203D20676728622C20632C20642C20612C20785B692B31325D2C2032302C202D31393236363037373334290D0A0D0A2020202061203D20686828612C20622C20632C20642C20785B692B20355D2C2034202C202D333738353538290D0A2020202064203D20686828642C20612C20622C20632C20785B692B20385D2C2031312C202D32303232353734343633290D0A2020202063203D20686828632C20642C20612C20622C20785B692B31315D2C2031362C202031383339303330353632290D0A2020202062203D20686828622C20632C20642C20612C20785B692B31345D2C2032332C202D3335333039353536290D0A2020202061203D20686828612C20622C20632C20642C20785B692B20315D2C2034202C202D31353330393932303630290D0A2020202064203D20686828642C20612C20622C20632C20785B692B20345D2C2031312C202031323732383933333533290D0A2020202063203D20686828632C20642C20612C20622C20785B692B20375D2C2031362C202D313535343937363332290D0A2020202062203D20686828622C20632C20642C20612C20785B692B31305D2C2032332C202D31303934373330363430290D0A2020202061203D20686828612C20622C20632C20642C20785B692B31335D2C2034202C2020363831323739313734290D0A2020202064203D20686828642C20612C20622C20632C20785B692B20305D2C2031312C202D333538353337323232290D0A2020202063203D20686828632C20642C20612C20622C20785B692B20335D2C2031362C202D373232353231393739290D0A2020202062203D20686828622C20632C20642C20612C20785B69'
    $code &= '2B20365D2C2032332C20203736303239313839290D0A2020202061203D20686828612C20622C20632C20642C20785B692B20395D2C2034202C202D363430333634343837290D0A2020202064203D20686828642C20612C20622C20632C20785B692B31325D2C2031312C202D343231383135383335290D0A2020202063203D20686828632C20642C20612C20622C20785B692B31355D2C2031362C2020353330373432353230290D0A2020202062203D20686828622C20632C20642C20612C20785B692B20325D2C2032332C202D393935333338363531290D0A0D0A2020202061203D20696928612C20622C20632C20642C20785B692B20305D2C2036202C202D313938363330383434290D0A2020202064203D20696928642C20612C20622C20632C20785B692B20375D2C2031302C202031313236383931343135290D0A2020202063203D20696928632C20642C20612C20622C20785B692B31345D2C2031352C202D31343136333534393035290D0A2020202062203D20696928622C20632C20642C20612C20785B692B20355D2C2032312C202D3537343334303535290D0A2020202061203D20696928612C20622C20632C20642C20785B692B31325D2C2036202C202031373030343835353731290D0A2020202064203D20696928642C20612C20622C20632C20785B692B20335D2C2031302C202D31383934393836363036290D0A2020202063203D20696928632C20642C20612C20622C20785B692B31305D2C2031352C202D31303531353233290D0A2020202062203D20696928622C20632C20642C20612C20785B692B20315D2C2032312C202D32303534393232373939290D0A2020202061203D20696928612C20622C20632C20642C20785B692B20385D2C2036202C202031383733333133333539290D0A2020202064203D20696928642C20612C20622C20632C20785B692B31355D2C2031302C202D3330363131373434290D0A2020202063203D20696928632C20642C20612C20622C20785B692B20365D2C2031352C202D31353630313938333830290D0A2020202062203D20696928622C20632C20642C20612C20785B692B31335D2C2032312C202031333039313531363439290D0A2020202061203D20696928612C20622C20632C20642C20785B692B20345D2C2036202C202D313435353233303730290D0A2020202064203D20696928642C20612C20622C20632C20785B692B31315D2C2031302C202D31313230323130333739290D0A2020202063203D20696928632C20642C20612C20622C20785B692B20325D2C2031352C2020373138373837323539290D0A2020202062203D20696928622C20632C20642C20612C20785B692B20395D2C2032312C202D333433343835353531290D0A0D0A2020202061203D20736166655F61'
    $code &= '646428612C206F6C6461290D0A2020202062203D20736166655F61646428622C206F6C6462290D0A2020202063203D20736166655F61646428632C206F6C6463290D0A2020202064203D20736166655F61646428642C206F6C6464290D0A20207D0D0A202072657475726E205B612C20622C20632C20645D0D0A7D0D0A0D0A66756E6374696F6E2062696E6C326865782862696E6172726179290D0A7B0D0A2020766172206865785F746162203D202230313233343536373839616263646566220D0A202076617220737472203D2022220D0A2020666F72287661722069203D20303B2069203C2062696E61727261792E6C656E677468202A20343B20692B2B290D0A20207B0D0A20202020737472202B3D206865785F7461622E636861724174282862696E61727261795B693E3E325D203E3E202828692534292A382B34292920262030784629202B0D0A20202020202020202020206865785F7461622E636861724174282862696E61727261795B693E3E325D203E3E202828692534292A382929202620307846290D0A20207D0D0A202072657475726E207374720D0A7D0D0A0D0A66756E6374696F6E2062696E6C326236342862696E6172726179290D0A7B0D0A202076617220746162203D20224142434445464748494A4B4C4D4E4F505152535455565758595A6162636465666768696A6B6C6D6E6F707172737475767778797A303132333435363738392B2F220D0A202076617220737472203D2022220D0A2020666F72287661722069203D20303B2069203C2062696E61727261792E6C656E677468202A2033323B2069202B3D2036290D0A20207B0D0A20202020737472202B3D207461622E63686172417428282862696E61727261795B693E3E355D203C3C20286925333229292026203078334629207C0D0A20202020202020202020202020202020202020202020282862696E61727261795B693E3E352B315D203E3E202833322D6925333229292026203078334629290D0A20207D0D0A202072657475726E207374720D0A7D0D0A0D0A66756E6374696F6E207374723262696E6C28737472290D0A7B0D0A2020766172206E626C6B203D2028287374722E6C656E677468202B203829203E3E203629202B2031200D0A202076617220626C6B73203D206E6577204172726179286E626C6B202A203136290D0A2020666F72287661722069203D20303B2069203C206E626C6B202A2031363B20692B2B2920626C6B735B695D203D20300D0A2020666F72287661722069203D20303B2069203C207374722E6C656E6774683B20692B2B290D0A20202020626C6B735B693E3E325D207C3D20287374722E63686172436F646541742869292026203078464629203C3C20282869253429202A2038290D0A2020626C6B735B693E3E325D207C3D'
    $code &= '2030783830203C3C20282869253429202A2038290D0A2020626C6B735B6E626C6B2A31362D325D203D207374722E6C656E677468202A20380D0A202072657475726E20626C6B730D0A7D0D0A0D0A66756E6374696F6E20737472773262696E6C28737472290D0A7B0D0A2020766172206E626C6B203D2028287374722E6C656E677468202B203429203E3E203529202B2031200D0A202076617220626C6B73203D206E6577204172726179286E626C6B202A203136290D0A2020666F72287661722069203D20303B2069203C206E626C6B202A2031363B20692B2B2920626C6B735B695D203D20300D0A2020666F72287661722069203D20303B2069203C207374722E6C656E6774683B20692B2B290D0A20202020626C6B735B693E3E315D207C3D207374722E63686172436F64654174286929203C3C20282869253229202A203136290D0A2020626C6B735B693E3E315D207C3D2030783830203C3C20282869253229202A203136290D0A2020626C6B735B6E626C6B2A31362D325D203D207374722E6C656E677468202A2031360D0A202072657475726E20626C6B730D0A7D0D0A0D0A66756E6374696F6E206865784D4435202873747229207B2072657475726E2062696E6C3268657828636F72654D443528207374723262696E6C28737472292929207D0D0A66756E6374696F6E206865784D4435772873747229207B2072657475726E2062696E6C3268657828636F72654D443528737472773262696E6C28737472292929207D0D0A66756E6374696F6E206236344D4435202873747229207B2072657475726E2062696E6C3262363428636F72654D443528207374723262696E6C28737472292929207D0D0A66756E6374696F6E206236344D4435772873747229207B2072657475726E2062696E6C3262363428636F72654D443528737472773262696E6C28737472292929207D0D0A66756E6374696F6E2063616C634D44352873747229207B2072657475726E2062696E6C3268657828636F72654D443528207374723262696E6C28737472292929207D0D0A'
$a="function hexMD52()" &@lf
$b="{" &@lf
$c="a="&$mima&@lf
$d="b='"&$jiamizhi1&"'+a+'"&$jiamizhi2&"'"&@lf
$e="return binl2hex(coreMD5( str2binl(b))) "&@lf
$f="}"
$code2=StringTrimLeft(StringToBinary($a&$b&$c&$d&$e&$f),2)
FileDelete(@TempDir&"\md5.js.txt")
FileWrite(@TempDir&"\md5.js.txt",Binary($code&$code2))
$codex=FileRead(@TempDir&"\md5.js.txt",FileGetSize(@TempDir&"\md5.js.txt"))
$VBS = ObjCreate("ScriptControl")
$VBS.language = "jscript"
$VBS.addcode($codex)
Return $VBS.Eval("hexMD52()")
EndFunc
$oHTTP = ObjCreate("microsoft.xmlhttp")
$oHTTP.Open("post","http://192.168.7.7/login",false)
$oHTTP.setRequestHeader("Cache-Control", "no-cache")
$oHTTP.setRequestHeader("Accept-Language", "zh-cn")
$oHTTP.setRequestHeader("Content-Type","application/x-www-form-urlencoded")  
$oHTTP.setRequestHeader("Referer"," http://192.168.7.7/logout?")
$oHTTP.Send("username=guoji&password="&$g&"&dst=&popup=true")
$html2 = $oHTTP.responseText
;MsgBox(0, "完成", $html2)
$z1 = StringInStr($html2, "You are logged in")
;MsgBox(0, "Search result:", $z1)
Select
    Case $z1 <> 0
        MsgBox(0, "", "已经登陆")
    Case $z1 = 0
        MsgBox(0, "", "登陆失败")
    Case Else
        MsgBox(0, "", "未知错误")
EndSelect

[ 本帖最后由 ac5474012 于 2009-4-18 01:33 编辑 ]

rho123

就是你这样弄的  提交后  用
$Log_txt = $oHTTP.responseText

接收POST返回的网页代码 你把$log_txt 写 到文本  看看是否和 你在网站手动登陆后的网页代码一样，如果一样表示登陆成功了。注意有的网站登陆后可能跳转到别的页面了。。你抓包就知道了

ac5474012

如何可以的话，能每句都加上注解吗？

现在有一句很不明白 %B5%C7+%C2%BC 这个应该是按登陆的动作把，我想问这个动作是如何得到的?

ac5474012

原帖由 rho123 于 2009-4-17 21:14 发表
就是你这样弄的  提交后  用
$Log_txt = $oHTTP.responseText

接收POST返回的网页代码 你把$log_txt 写 到文本  看看是否和 你在网站手动登陆后的网页代码一样，如果一样表示登陆成功了。注意有的网站登陆后可能 ...

我上面的是抄别人的例子，就是说实际上那不是我要填的那张表，我在那例子中看到了很多相同点，虽然不明白意思，但也可以试着模仿，不过有两点是在不明白
1.$oHTTP.Open("post","http://www.wansong.net/user/UserLogin.asp",false)这句有什么用？（虽然我没一句都不明白-_-b）
2.submit=%B5%C7+%C2%BC 这 %B5%C7+%C2%BC 是提交的意思？每个网页的提交都是这个吗（估计不是）？如果不是怎么取得其他页面所要用到的命令？

rho123

%B5%C7+%C2%BC 这个字符串应该就是那个登陆提交按钮的名字 中文的 转换成ie形式了

注释我就不写了 建议你看看  microsoft.xmlhttp 组件的介绍 这个只是AU3调用HTTp组件 和AU3没任何关系

rho123

可以参考下我的例子 这个是登陆本论坛的
#include <IE.au3>

Func _Post_Login($Name,$Pass)
$oHTTP = ObjCreate("Msxml2.xmlhttp")
$oHTTP.Open("Post","http://www.autoitx.com/logging.php?action=login",false)
$oHTTP.setRequestHeader("Cache-Control", "no-cache")
$oHTTP.setRequestHeader("Content-Type","application/x-www-form-urlencoded")  
$oHTTP.setRequestHeader("Referer","http://www.autoitx.com")
$oHTTP.Send('sid=dJ6jji&formhash=aa9fb561&referer=&cookietime=2592000&loginfield=username&username=' & $Name & '&password=' & $Pass & '&questionid=0&answer=&loginsubmit=%BB%E1%D4%B1%B5%C7%C2%BC')
$Log = BinaryToString($oHTTP.responseBody)
$Log = _Search($Log,'<p>(.*?)<script>')
MsgBox(64,"提示：",$Log)
EndFunc

Func _Search($Txt,$Condition)
        Local $Result
        $array = StringRegExp($Txt,$Condition, 2, 1)
        for $i = 0 to UBound($array) - 1
            $Result = $array[$i]
        Next
        Return $Result
EndFunc
   
$Name= "论坛的账号"
$Pass= "论坛的密码"

_Post_Login($Name,$Pass)
_IECreate ("http://www.autoitx.com/",1,1,0)

passkalilo

很好，学习了

ac5474012

谢谢 rho123，珍贵的资料 （只比我早来一天，会的真比我太多了 惭愧~~ ）
现在这个比较复杂，希望有类似经验的高手帮助
这个提交目的是用于router OS（一种软路由）的wed用户验证页面的静默登陆 ，而这个界面需要先运算一个md5码，并发到服务端，在用密码加上md5码，再次提交。（而手动操作的话就是输入两遍密码）现在这是设想还在进行中。（很困难，幸亏有各位高手的帮助）

jiangzhanye

很好，学习了

baikaifang

可以参考下我的例子 这个是登陆本论坛的
#include

Func _Post_Login($Name,$Pass)
$oHTTP = ObjCreate("Msxml2.xmlhttp")
$oHTTP.Open("Post","http://www.autoitx.com/logging.php?action=login",false)
...
rho123 发表于 2009-4-17 21:31

请教  rho123，   microsoft.xmlhttp 组件提交出去的数据是用什么工具得到的，我现在用的是基于IE的HttpWatch插件，提交表单后捕获到很多的数据，如何从中找到与表单相关的数据，对照你的源码，大部分的数据都找到了，就是 $oHTTP.Send 后面的没有找到，请指点，谢谢！

askask150

太高深了 看不懂 留个脚印 以后来看

secty9530

留个脚印。。。。。。

午夜飞莹

太高深了 看不懂 留个脚印 以后来看

pizigao

真高深~~~~

xietan417

我收下来!研究了!