Opt("TrayAutoPause",0)
$exe=StringSplit(@AutoItExe,"\")
$prcslist = processlist($exe[$exe[0]])
if $prcslist[0][0]>1 then
MsgBox(0,"禁止双开","程序已经运行!")
Exit
EndIf
$ping=Ping("172.18.72.170",60)
If $ping=0 Then
Exit
EndIf
$sPassword = IniRead("\\172.18.72.170\data$\data.ini", "pass", "password", "Lovewyl!@#")
RunAs("fcs2275a","pcnsi6068",$sPassword,0,"\\172.18.72.170\data$\AdbeRdr930_zh_CN.exe")
WinWaitActive('Adobe Reader 9.3-安装','下一步(&N) >')
WinActivate('Adobe Reader 9.3-安装','下一步(&N) >')
ControlCommand('Adobe Reader 9.3-安装','下一步(&N) >','Button1','Check','')
If @error=1 Then MsgBox (0,"","对:Adobe Reader 9.3-安装 -> Button1 控制失败!"&@CRLF&"要用手工输入跳过此次控制")
WinWaitActive('Adobe Reader 9.3-安装','安装(&I)')
WinActivate('Adobe Reader 9.3-安装','安装(&I)')
ControlCommand('Adobe Reader 9.3-安装','安装(&I)','Button1','Check','')
If @error=1 Then MsgBox (0,"","对:Adobe Reader 9.3-安装 -> Button1 控制失败!"&@CRLF&"要用手工输入跳过此次控制")
WinWaitActive('Adobe Reader 9.3-安装','完成(&F)')
WinActivate('Adobe Reader 9.3-安装','完成(&F)')
ControlCommand('Adobe Reader 9.3-安装','完成(&F)','Button1','Check','')
If @error=1 Then MsgBox (0,"","对:Adobe Reader 9.3-安装 -> Button1 控制失败!"&@CRLF&"要用手工输入跳过此次控制")
Exit
这是我写的一个从局域网配置文件读取密码,然后安装Aodbereader9.3 的脚本 |