|
  
|
1#
发表于 2007-4-22 06:02 PM
| 只看该作者
- #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")
复制代码 配制文件如下:
[过滤王]
服务端地址=192.168.0.100
用户名=admin
密码=admin |
感谢Baidu,Google,Dreams8给我这次机会!
还要感谢我的爸爸妈妈!
HOHO |
|