求自动静默安装补丁的AU3脚本

heimahack

在网上找了自动安装系统补丁的脚本.编译后运行出错.不明白是我的编译器版本问题还是AU3脚本的问题.希望有人能发份自动静默安装系统补丁.本人用来做封装系统用.谢谢

#include <File.au3>
$FileList=_FileListToArray(@ScriptDir & "\Update","*.exe",1)
For $i=3 To 1 Step -1
ToolTip(@CR&"  共" & $FileList[0] & "个系统补丁，" & $i & "秒后开始安装...   "
& @CR, @DesktopWidth-260, @DesktopHeight-100)
Sleep(1000)
Next
For $i=1 To $FileList[0]
ToolTip(@CR&"  正在安装 " & $FileList[$i] & " (" & $i & "/" & $FileList[0] &")   "
& @CR, @DesktopWidth-320, @DesktopHeight-100)
RunWait(@ScriptDir & "\Update\" & $FileList[$i] & " /quiet /passive /norestart")
Next
ToolTip(@CR&"  系 统 补 丁 安 装 完 毕 !  "  &  @CR,  @DesktopWidth-260,
@DesktopHeight-100)
Sleep(2000)


这段代码是网上找的.
编译后就出现这样的错误.贴个图出来.

131738

复制你的源码到脚本编辑器,  发现语句格式不对!  应该没问题的!

你复制下段代码试试看....................

#include <File.au3> 
$FileList=_FileListToArray(@ScriptDir & "\Update","*.exe",1) 
For $i=3 To 1 Step -1 
        ToolTip(@CR&"  共" & $FileList[0] & "个系统补丁，" & $i & "秒后开始安装...   " & @CR, @DesktopWidth-260, @DesktopHeight-100) 
        Sleep(1000) 
Next 
For $i=1 To $FileList[0] 
        ToolTip(@CR&"  正在安装 " & $FileList[$i] & " (" & $i & "/" & $FileList[0] &")   " & @CR, @DesktopWidth-320, @DesktopHeight-100) 
        RunWait(@ScriptDir & "\Update" & $FileList[$i] & " /quiet /passive /norestart") 
Next 
ToolTip(@CR&"  系 统 补 丁 安 装 完 毕 !  "  &  @CR,  @DesktopWidth-260, @DesktopHeight-100) 
Sleep(2000)

志在行走

>"D:\autoit3\SciTe\ACNWrapper\ACNWrapper.exe" /run /ErrorStdOut /in "E:\1.au3" /autoit3dir "D:\autoit3" /UserParams   
+>20:54:05 开始执行 ACNWrapper v.1.0.0.8
+> ============================================
+>执行环境:
+>        CPU构架:        X64
+>        系统构架:        X86
+>        系统语言:        0804
+>        键盘布局:        00000804
+>        IP地址:                192.168.1.33
+>        内存总量:        1023MB
+>        内存剩余:        563MB
+>        操作系统:        WIN_XP/Service Pack 3
+>        AU3版本:        3.3.5.6
+> ============================================
>运行 AU3Check (1.54.19.0)  开始目录:D:\autoit3
+>20:54:05 AU3Check 完成[CODE]:0
>运行:(3.3.5.6):D:\autoit3\autoit3.exe "E:\1.au3"   
E:\1.au3 (4) : ==> ???????????.:
ToolTip(@CR&"  ?" & $FileList[0] & "??????" & $i & "??????...   " & @CR, @DesktopWidth-260, @DesktopHeight-100)
ToolTip(@CR&"  ?" & $FileList^ ERROR
->20:54:06 AutoIT3.exe 完成:[CODE]:1
+>20:54:07 ACNWrapper 完成..
>退出代码: 1    时间: 2.199

soby2010

这倒底是哪个正确啊！！！！！

soby2010

上面几个都是有点错误的。。希望能修改一下一步！！

david_hu

顶顶，支持楼主！！

hooshen

#include <File.au3>
    $FileList=_FileListToArray(@ScriptDir & "\Update","*.exe",1)
if @error Then
   MsgBox(0,"信息","Update目录下无补丁文件",3)
   Exit
EndIf

    For $i=3 To 1 Step -1
        ToolTip(@CR & " 共" & $FileList[0] & "个系统补丁，" & $i & "秒后开始安装... " & @CR, @DesktopWidth-260,@DesktopHeight-100)
        Sleep(1000)
    Next
    For $i=1 To $FileList[0]
        ToolTip(@CR&" 正在安装 " & $FileList[$i] & " (" & $i & "/" & $FileList[0] &") " & @CR, @DesktopWidth-320, @DesktopHeight-100)
        RunWait(@ScriptDir & "\Update\" & $FileList[$i] & " /passive /norestart /nobackup")
    Next
    ToolTip(@CR&"   系 统 补 丁 安 装 完 毕 ！            " & @CR, @DesktopWidth-260,@DesktopHeight-100)
    Sleep(3000)

hooshen

我这段也是网上找的，运行正常，只是有一点，不能判断补丁是否已经安装，如果安装过程中意外中断的话，重新运行脚本，又得重新来过，希望高手指点

12250279

感谢大家的分享,嘿嘿,我去测试测试,