autoit能实现网页后台自动回复么
本帖最后由 chu007 于 2012-6-5 21:42 编辑小弟初来,接触过AutoHotKey,能实现前台网页自动回复 ,但是后台么,看完了全部帮助文档,没看到想要的。
也接触过按键精灵,可以用WQM实现,但是很不稳定,会因为网络原因,点到其他地方去。
希望大贤能不吝赐教,就此谢过了。能举个例子了就更好了。 完全没问题,用xmlhttp就行了 完全没问题,用xmlhttp就行了
ebhb 发表于 2012-6-5 21:41 http://www.autoitx.com/images/common/back.gif
比如在这里http://bbs.lanlue.com/read-htm-tid-90027.html
要求引用回复,应该怎么写?谢谢。 给你一个自动登录的代码#include <IE.au3>
Func _Post_Login($Name,$Pass)
$oHTTP = ObjCreate("Msxml2.xmlhttp")
$oHTTP.Open("Post","http://www.autoitx.com/logging.phpaction=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)
用POST搞定,收工! 用POST搞定,收工!
hzxymkb 发表于 2012-6-5 22:41 http://www.autoitx.com/images/common/back.gif
能举个代码示例么,我在看帮助文档,还没找到啊。 回复 6# chu007
大大们提供思路了 要先登录取得cook,然后用这个cook再加上要回复的内容post就行了 用POST提交试验一下,论坛搜索POST即可。。 http://www.autoitx.com/thread-29345-1-1.html
可以看看我的帖子 DZ抢楼工具
页:
[1]