网页弹出的小登录窗口中的表单如何填写？[已解决]

cashiba

这种东西不那搞，建议用POST方法，秒杀一切，哈哈！
cihron 发表于 2016-10-7 01:46

谢谢回帖！记得表单提交有post方法和get方法，好像绝大多数都是post方法吧？
POST方法秒杀一切，我好像不太懂阿，有没有例子呢？

cxlater

回复 14# cashiba


    这个不属于报错,执行状态.
点击登录按钮之后   是不能立刻获取到输入控件对象的   需要一个加载的过程

ila

平时发现不少弹出窗口，比喻一些程序的提示信息弹窗，或一些网页弹窗，用Au3Info.exe无法获取这些弹窗的信息 ...
cashiba 发表于 2016-10-7 20:46

Au3Info.exe主要探测gui，
截图里是web页面。

post需要httpwatch等工具辅助，
前提了解http。

自己有简单写过网站后台更清楚这。


下面用代理，post登录18p2p的网站

Dim $postdata="formhash=7e133f94&referer=index.php&cookietime=315360000&loginfield=username&username=xxxxx&password=xxxxx&questionid=0&answer=&loginsubmit=%B7%7C%AD%FB%B5n%A4J"
Global $login_url="http://www.18p2p.com/forum/logging.php?action=login"
Global $url="http://www.18p2p.com/forum/forum.php?mod=viewthread&tid=5971465&extra=page%3D1"

Global $oHTTP= ObjCreate("WinHttp.WinHttpRequest.5.1")
$oHTTP.SetProxy('2',"http://192.168.3.149:8848","")
$oHTTP.Open("POST",$login_url,False)
$oHTTP.setRequestHeader('Content-Type','application/x-www-form-urlencoded')
$oHTTP.setRequestHeader("User-Agent","Mozilla/5.0 (Windows NT 6.1; Trident/7.0; rv:11.0) like Gecko")
;_WinHttpAddRequestHeaders($request1,"")
$oHTTP.Send($postdata)

$oHTTP.Open("GET",$url)
$oHTTP.setRequestHeader("User-Agent","Mozilla/5.0 (Windows NT 6.1; Trident/7.0; rv:11.0) like Gecko")
$oHTTP.Send()

$ostream = ObjCreate("adodb.stream")
$oStream.Type = 1
$oStream.Mode = 3
$oStream.Open()
$oStream.Write($oHTTP.ResponseBody)
$oStream.Position = 0
$oStream.Type = 2
$oStream.Charset = "big5"
ConsoleWrite($oStream.ReadText)

cashiba

回复  cashiba
这个不属于报错,执行状态.
点击登录按钮之后   是不能立刻获取到输入控件对象的  ...
cxlater 发表于 2016-10-7 21:57

明白了，编译后就没问题了...感谢感谢！

cashiba

Au3Info.exe主要探测gui，
截图里是web页面。

post需要httpwatch等工具辅助，
前提了解http。

自 ...
ila 发表于 2016-10-7 23:52

感觉这个WinHttp有些高端的样子，不懂哇，网上搜了一下，好像不太容易找到通俗易懂的教程....
你这段代码一时还消化不了，留着以后再琢磨琢磨.....谢谢指点！

cashiba

有机会学学WinHttp.....感谢各位老师！