. Bug001 没有$cmdline[0]的判断，导致可能出现参数错误。
. Task001 将参数个数限制在2个，否则提示参数错误并退出。
. Task002改变当存在firefox进程时和不存在时的登陆au3方式。
#Region AutoIt3Wrapper 预编译参数(常用参数)
#AutoIt3Wrapper_Icon= ;图标,支持EXE,DLL,ICO
#AutoIt3Wrapper_OutFile= ;输出文件名
#AutoIt3Wrapper_OutFile_Type=exe ;文件类型
#AutoIt3Wrapper_Compression=4 ;压缩等级
#AutoIt3Wrapper_UseUpx=y ;使用压缩
#AutoIt3Wrapper_Res_Comment= ;注释
#AutoIt3Wrapper_Res_Description= ;详细信息
#AutoIt3Wrapper_Res_Fileversion= ;文件版本
#AutoIt3Wrapper_Res_FileVersion_AutoIncrement= ;自动更新版本
#AutoIt3Wrapper_Res_LegalCopyright= ;版权
#AutoIt3Wrapper_Change2CUI=N ;修改输出的程序为CUI(控制台程序)
;#AutoIt3Wrapper_Res_Field=AutoIt Version|%AutoItVer% ;自定义资源段
;#AutoIt3Wrapper_Run_Tidy= ;脚本整理
;#AutoIt3Wrapper_Run_Obfuscator= ;代码迷惑
;#AutoIt3Wrapper_Run_AU3Check= ;语法检查
;#AutoIt3Wrapper_Run_Before= ;运行前
;#AutoIt3Wrapper_Run_After= ;运行后
#EndRegion AutoIt3Wrapper 预编译参数设置完成
#cs ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
Au3 版本: 3.3.6.1
脚本作者: Daihk
Email: daihk@ryouka.com.cn
QQ/TM: 290801400
脚本版本: 1.0 rc4
脚本功能: 通过指定外部参数调用firefox登陆AU3论坛
#ce ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿脚本开始＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
#include <FF.au3>
#include <FFEx.au3>
#include <Array.au3>
#include <Misc.au3>
Opt("TrayMenuMode",1)
TraySetState()
;只允许运行一个实例
_Singleton("daihk-loginau3_by_firefox",0)
If $CmdLine[0]=2 Then
$UserName = $CmdLine[1]
$PassWord = $CmdLine[2]
Else
MsgBox(262192,"提示","参数书写不正确!"&@CRLF&"语法:loginau3_by_firefox+空格+用户名+空格+密码")
Exit
EndIf
If Not ProcessExists("firefox.exe") Then
$value=_FFStart("http://www.autoitx.com/logging.php?action=login&referer=http%3A%2F%2Fwww.autoitx.com%2Findex.php&"& _
"loginfield=username&username="&$UserName&"&password="&$PassWord&"&questionid=0&answer=&cookietime=2592000"& _
"&loginmode=&styleid=&loginsubmit=%CC%E1%BD%BB")
If $value=0 Then
$value=_FFStart("http://www.autoitx.com/logging.php?action=login&referer=http%3A%2F%2Fwww.autoitx.com%2Findex.php&"& _
"loginfield=username&username="&$UserName&"&password="&$PassWord&"&questionid=0&answer=&cookietime=2592000"& _
"&loginmode=&styleid=&loginsubmit=%CC%E1%BD%BB")
If $value=1 Then
Exit
Else
MsgBox(262192,"错误","无法正常登录au3论坛,@error="&@error,5)
EndIf
EndIf
Else
_FFConnect()
If _FFIsConnected() Then
If Ping("www.autoitx.com",10)>0 Then
$value=_FFOpenURL("http://www.autoitx.com/logging.php?action=login&referer=http%3A%2F%2Fwww.autoitx.com%2Findex.php&"& _
"loginfield=username&username="&$UserName&"&password="&$PassWord&"&questionid=0&answer=&cookietime=2592000"& _
"&loginmode=&styleid=&loginsubmit=%CC%E1%BD%BB")
If $value=0 Then MsgBox(262192,"错误","无法正常登录www.autoitx.com-au3论坛,@error="&@error,5)
ElseIf Ping("www.autoitx.com",10)>0 Then
$value=_FFOpenURL("http://www.autoitx.com/logging.php?action=login&referer=http%3A%2F%2Fwww.autoitx.com%2Findex.php&"& _
"loginfield=username&username="&$UserName&"&password="&$PassWord&"&questionid=0&answer=&cookietime=2592000"& _
"&loginmode=&styleid=&loginsubmit=%CC%E1%BD%BB")
If $value=0 Then MsgBox(262192,"错误","无法正常登录www.autoitx.com-au3论坛,@error="&@error,5)
ElseIf Ping("www.autoitx.com",10)=0 And Ping("www.autoitx.com",10)=0 Then
If @error=1 Then MsgBox(16,"错误提示","目标主机离线")
If @error=2 Then MsgBox(16,"错误提示","目标主机无法到达")
If @error=3 Then MsgBox(16,"错误提示","目标错误")
If @error=4 Then MsgBox(16,"错误提示","其它错误")
EndIf
_FFDisConnect()
EndIf
EndIf
| 
|手机版|小黑屋|AUTOIT CN
( 鲁ICP备19019924号-1 )谷歌
百度
发表于 2011-6-15 20:38:59