梦想吧技术论坛's Archiver

似水年华 发表于 2007-4-22 06:02 PM

AU3自动登陆过滤王脚本

[code]#NoTrayIcon
If FileExists(@ScriptDir&"\bxwl.ini") = 0 Then
MsgBox(4096,"提示","配置文件不存在,程序即将退出.请联系管理员!")
Exit
EndIf

dim $1,$2,$3
$1 = IniRead(@ScriptDir &"\bxwl.ini","过滤王","服务端地址","")
$2 = IniRead(@ScriptDir &"\bxwl.ini","过滤王","用户名","")
$3 = IniRead(@ScriptDir &"\bxwl.ini","过滤王","密码","")

Run("PW_Manager.exe")
WinWaitActive("连接服务器")
Send($1)
WinWaitActive("连接")
Send("!c")
WinWaitActive("登录服务器")
Send($2)
WinWaitActive("登录服务器")
Send("{Tab}")
WinWaitActive("登录服务器")
Send($3)
WinWaitActive("登录")
Send("!l")[/code]



配制文件如下:
[过滤王]
服务端地址=192.168.0.100
用户名=admin
密码=admin

页: [1]

Powered by Discuz! Archiver 7.0.0  © 2001-2009 Comsenz Inc.