原创：我自己用的IOPQ自动签到程序（AU3源码+详细描述）
本帖最后由 骗子 于 2012-2-21 04:42 编辑无意间看到涛涛发布的公告：
请立即停止使用论坛自动签到软件，已有多名会员账号被盗(2012-2-20)
作者: 涛涛
http://www.iopq.com/thread-16769044-1-1.html
刚发现一年前我已经发过程序了，但是没人用：（
au3打造:论坛多账号自动签到程序
就将自己用的自动签到工具发上来，省的大家再受那个软件的害。
直接发EXE怕被大家当成又一个木马，所以连源代码也一起发上来，怕马的自己编译成EXE
附件中文件说明：
medu.ico 图标文件，就是编译生产EXE的图标
骗子共享论坛签到.au3 AU3源代码，可以用记事本打开查看内容
IOPQ自动签到.exe 成品的EXE,怕马下载AU3（一款类似按键精灵的软件）自己编译源代码即可
软件说明：通过模拟鼠标点击的方法来实现自动签到;支持多账号，在配置文件（IOPQ.INI）中按照格式添加多个账号即可
骗子共享论坛签到.au3的内容，怕压缩包有毒直接复制下面的内容到记事本中然后保存为 骗子共享论坛签到.au3 即可用AU3软件的编辑器编辑;说明：通过模拟鼠标点击的方法来实现自动签到
;支持多账号，在配置文件（IOPQ.INI）中按照格式添加多个账号即可
#region ;**** 以下部分为一些版权信息，希望能保留 ****
#AutoIt3Wrapper_Icon=medu.ico ;生成EXE后的图标
#AutoIt3Wrapper_OutFile=IOPQ自动签到.exe ;输出EXE的名称
#AutoIt3Wrapper_Compression=4 ;压缩级别
#AutoIt3Wrapper_Res_Comment=medoclub.taobao.com ;我的淘宝店网址
#AutoIt3Wrapper_Res_Description=梦想骗子（QQ：375703342） ;软件描述
#AutoIt3Wrapper_Res_FileVersion=0.0.0.0 ;版本
#AutoIt3Wrapper_Res_LegalCopyright=medoclub.taobao.com ;也算描述吧
#endregion ;**** 以下部分为一些版权信息，希望能保留 ****
#include <IE.au3> ;需要的UDF
#NoTrayIcon ;不显示托盘图标
ShellExecute("iexplore.exe", "medoclub.taobao.com") ;弹窗广告，用IE打开我的淘宝店，希望能保留，估计可能性不大 ：（
Sleep (5000) ;等待5秒
;;===========防止程序重复====================
$g_szVersion = "防止重复运行.exe"
If WinExists($g_szVersion) Then Exit
AutoItWinSetTitle($g_szVersion)
;;===========================================
HotKeySet("^1", "_xianshiIE") ;CTRL +1 为快捷键，用来显示隐藏的IE
_IEErrorHandlerRegister() ;错误输出模式?好像有了这个即使出错也不退出脚本
_IELoadWaitTimeout(15000) ;定义超时时间
$dir = @ScriptDir & "\iopq.ini" ;定义配置文件的路径
If Not FileExists($dir) Then;如果无配置文件则
IniWrite($dir, "账号列表", "账号1", "密码1") ;写配置
IniWrite($dir, "账号列表", "账号2", "密码2");写配置
MsgBox (4096,"无配置文件","请按照格式修改配置文件后再运行此程序") ;弹对话框说明
ShellExecute ($dir) ;打开默认的配置
Exit ;退出
EndIf
$read = IniReadSection($dir, "账号列表") ;读取配置到数组
For $i = 1 To $read ;;从第一个账号开始到最后一个账号
RunWait(@ComSpec & " /C TASKKILL/F /IM iexplore.exe /T", "", @SW_HIDE) ;调用dos命令结束IE
$oIE = _IECreate("http://www.iopq.com/member.php?mod=logging&action=login&username=" & $read[$i] & "&password=" & $read[$i] & "&loginsubmit=yes", 0, 0);用IE登录账号，隐藏在后台,想显示出来的话按CTRL +1
_IELoadWait($oIE, 500) ;等待IE加载完毕，我这里IOPQ有时候很慢，所有我用了两个
_IELoadWait($oIE, 500)
_IELinkClickByText($oIE, "每日签到") ;模拟鼠标点击 每日签到
_IELoadWait($oIE, 200);等待IE加载完毕
_IEImgClick($oIE, "source/plugin/dsu_paulsign/img/2/shuai.gif");点击签到的表情图片
Sleep(200) ;等待200毫秒
$oIE.document.getElementsByName('qdmode').item(1).click ;点击说话的内容为系统自动
Sleep(200)
_IEImgClick($oIE, "source/plugin/dsu_paulsign/img/qdtb.gif") ;点击签到按钮
_IELoadWait($oIE, 2000);又加了延时保证签到成功，如果网速慢多加几个
_IELinkClickByText($oIE, "退出") ;模拟鼠标点击 退出
_IEQuit($oIE) ;关闭IE
Next
Func _xianshiIE() ;显示隐藏IE的子程序,通过快捷键调用，如果有多个的话只显示其中的一个
$oIE1 = _IEAttach("", "instance") ;找存在的IE
_IEAction($oIE1, "visible");显示
Return
EndFunc ;==>_xianshiIE
还是自己手动签到才是真的 刚发现一年前我已经发过程序了，但是没人用：（
au3打造:论坛多账号自动签到程序 :为何最后软件都发到网单区了,带后门？ 等小白测试...... 感谢楼主 支持宝湾 支持楼主多发点懒人软件 :自动签到奥，真是个做懒人的好工具 懒人软件啊~~！！ 最好自己来。 : 你都叫骗子了 谁敢用 自己来 还来 : AU3我喜欢，哈！感谢！ :
一般我自己能做到的事，从不麻烦软件！
哈哈 每天自己签到，就那么几秒时间而已…… 收藏到google reader，每天看reader的时候点下就ok了…… 自己顶顶
: 看不懂代码，有解释就最好了
页:
[1]