autocad2008简体中文完整版安装脚本（楼下那个用不了的)
#Region ;**** 参数创建于 ACNWrapper_GUI ****#PRE_Outfile=autocad2002.exe
#PRE_UseUpx=n
#PRE_Res_requestedExecutionLevel=None
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
const $a="先退出360安全卫士和360杀毒或者qq管家,再点击确定，在安装过程中，请别动鼠标和键盘!"
$var=MsgBox(1+48+256, "2008自动安装包", $a, 2500)
dim $var
select
case $var=2
exit
EndSelect
BlockInput(0)
Run("d:\autocad2008x32\setup.exe")
WinWaitActive("AutoCAD 2008","查看自述文件(&R)")
WinActive("AutoCAD 2008","查看自述文件(&R)")
Sleep(1000)
Send("{enter}")
WinWaitActive("AutoCAD 2008","下一步(&N) >")
WinActive("AutoCAD 2008","下一步(&N) >")
Sleep(1000)
Send("!N")
WinWaitActive("AutoCAD 2008","AutoCAD 2008")
WinActive("AutoCAD 2008","AutoCAD 2008")
Sleep(2000)
Send("!N")
WinWaitActive("AutoCAD 2008","China")
WinActive("AutoCAD 2008","China")
ControlCommand("AutoCAD 2008","China","","check")
Sleep(2000)
Send("!N")
WinWaitActive("AutoCAD 2008","*名字(&F):")
WinActive("AutoCAD 2008","*名字(&F):")
ControlFocus("AutoCAD 2008","*名字(&F):","")
Sleep(1000)
ControlSetText("AutoCAD 2008","*名字(&F):","","hh")
Sleep(1000)
ControlFocus("AutoCAD 2008","*名字(&F):","")
Sleep(1000)
ControlSetText("AutoCAD 2008","*名字(&F):","","zg")
ControlFocus("AutoCAD 2008","*名字(&F):","")
Sleep(1000)
ControlSetText("AutoCAD 2008","*名字(&F):","","ch")
Sleep(1000)
Send("!N")
WinWaitActive("AutoCAD 2008","选择要配置的产品(&S):")
WinActive("AutoCAD 2008","选择要配置的产品(&S):")
Sleep(1000)
Send("!N")
$text4="是(&Y)"
$title="AutoCAD 2008"
While 1
If WinExists($title,$text4) Then
Send("!y")
ExitLoop
EndIf
WEnd
WinWaitActive("AutoCAD 2008","完成(&F)")
WinActive("AutoCAD 2008","完成(&F)")
Sleep(1000)
Send("!F")
Sleep(2000)
Run("C:\Program Files\AutoCAD 2008\acad.exe")
Sleep(10000)
Run("C:\Program Files\AutoCAD 2008\keygen.exe")
keygen那个自动注册怎么弄的？
autoit的窗口信息查看器看不到东西？
页:
[1]