找回密码
 加入
搜索
查看: 4123|回复: 9

[IE类操作] autoit能实现网页后台自动回复么

  [复制链接]
发表于 2012-6-5 21:40:31 | 显示全部楼层 |阅读模式
本帖最后由 chu007 于 2012-6-5 21:42 编辑

小弟初来,接触过AutoHotKey,能实现前台网页自动回复 ,但是后台么,看完了全部帮助文档,没看到想要的。
也接触过按键精灵,可以用WQM实现,但是很不稳定,会因为网络原因,点到其他地方去。
希望大贤能不吝赐教,就此谢过了。能举个例子了就更好了。
发表于 2012-6-5 21:41:31 | 显示全部楼层
完全没问题,用xmlhttp就行了
 楼主| 发表于 2012-6-5 21:46:19 | 显示全部楼层
完全没问题,用xmlhttp就行了
ebhb 发表于 2012-6-5 21:41



    比如在这里http://bbs.lanlue.com/read-htm-tid-90027.html
要求引用回复,应该怎么写?谢谢。
发表于 2012-6-5 21:46:53 | 显示全部楼层
给你一个自动登录的代码
#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)
发表于 2012-6-5 22:41:03 | 显示全部楼层
用POST搞定,收工!
 楼主| 发表于 2012-6-5 23:00:08 | 显示全部楼层
用POST搞定,收工!
hzxymkb 发表于 2012-6-5 22:41



    能举个代码示例么,我在看帮助文档,还没找到啊。
发表于 2012-6-5 23:24:28 | 显示全部楼层
回复 6# chu007


    大大们提供思路了
发表于 2012-6-5 23:29:20 | 显示全部楼层
要先登录取得cook,然后用这个cook再加上要回复的内容post就行了
发表于 2012-6-5 23:36:31 | 显示全部楼层
用POST提交试验一下,论坛搜索POST即可。。
发表于 2012-6-6 00:22:05 | 显示全部楼层
http://www.autoitx.com/thread-29345-1-1.html
可以看看我的帖子 DZ抢楼工具
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-28 03:23 , Processed in 0.215459 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表