jww 发表于 2018-5-7 14:40:07

AutoCad2008自动安装

Opt("WinTitleMatchMode",2)

if msgbox(4,"源文件：D:\常用软件\CAD2008中文32&64双版.rar","需要安装AutoCAD2008吗？" ,10)=6 Then
   Send("#r")
   WinWaitActive("运行")
   ControlSetText("运行","",12298,"winrar.exe x D:\常用软件\CAD2008中文32&64双版.rar D:\常用软件\")
   sleep(200)
   Send("{ENTER}")
   WinWaitActive("正在从 CAD2008中文32&64双版 中提取")
   WinWaitClose("正在从 CAD2008中文32&64双版 中提取")


   If @OSArch="X64" Then


源文件下载：

8393671 发表于 2018-5-7 21:41:18

不错的脚本；

tulio 发表于 2018-9-7 10:15:41

不错的脚本；

tulio 发表于 2018-9-7 10:16:53

AU3之DllCall精讲（上）
页: [1]
查看完整版本: AutoCad2008自动安装