AutoCAD 2007+ 简体中文免注册自动激活版

 

就不多介绍了。

给出下载地址:

下载地址1

下载地址2

下载方法,右击下载地址,复制, 然后用迅雷新建任务,粘贴复制的地址就好了。

代码:

 

#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=acad.ico
#AutoIt3Wrapper_outfile= CAD 2007.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_UseAnsi=y
#AutoIt3Wrapper_Res_Description=By .Me
#AutoIt3Wrapper_Res_Fileversion=2007.0.0.3
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator
#AutoIt3Wrapper_Res_LegalCopyright=Copyright Yusky Group Co,.Ltd                        ;版权
#AutoIt3Wrapper_Res_Field=程序设计|Yusky
#AutoIt3Wrapper_Res_Field=作者|http://Yusky.me
#AutoIt3Wrapper_Res_Field=更新日期|2010-07-18
#AutoIt3Wrapper_Res_Field=适用版本|AutoCAD 2007
#AutoIt3Wrapper_Res_Field=源文件名|AutoCAD 2007.exe
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****

Run("Setup.exe")
WinWaitActive("Autodesk 安装程序")
ControlClick("Autodesk 安装程序","","Button1")
WinWaitActive("AutoCAD 2007 安装","取消")
ControlClick("AutoCAD 2007 安装","","Button2")

ControlClick("AutoCAD 2007 安装","","Button6")
ControlClick("AutoCAD 2007 安装","","Button1")
WinWaitActive("AutoCAD 2007 安装","取消")
ControlClick("AutoCAD 2007 安装","","Edit1")
Send("2222222222222")
ControlClick("AutoCAD 2007 安装","","Edit2")
ControlClick("AutoCAD 2007 安装","","Button1")

ControlClick("AutoCAD 2007 安装","","Edit1")
Send("{BACKSPACE 11}/{BS}Yusky.Me")
ControlClick("AutoCAD 2007 安装","","Edit2")

WinWaitActive("AutoCAD 2007 安装","","Edit2")
Send("{BACKSPACE 11}/{BS}Yusky.Me")
ControlClick("AutoCAD 2007 安装","","Edit3")
WinWaitActive("AutoCAD 2007 安装","","Edit3")
Send("{BACKSPACE 11}/{BS}Yusky.Me")
ControlClick("AutoCAD 2007 安装","","Edit4")
WinWaitActive("AutoCAD 2007 安装","","Edit4")
Send("{BACKSPACE 11}/{BS}Yusky.Me")

ControlClick("AutoCAD 2007 安装","","Edit5")
WinWaitActive("AutoCAD 2007 安装","","Edit5")
Send("{BACKSPACE 11}/{BS} 6783138")

ControlClick("AutoCAD 2007 安装","","Button1")

ControlClick("AutoCAD 2007 安装","","Button1")

ControlClick("AutoCAD 2007 安装","","Button1")

ControlClick("AutoCAD 2007 安装","","Button1")

ControlClick("AutoCAD 2007 安装","","Button1")

ControlClick("AutoCAD 2007 安装","","Button1")

ControlClick("AutoCAD 2007 安装程序","","Button1")
ControlClick("AutoCAD 2007 安装程序","","Button2")

;安装完毕,退出安装程序
Exit

使用编译脚本,然后把EXE文件放到CAD的Bin目录下。

有什么不懂的可以留言给我.

 可能有些多余的代码,欢迎纠错。

Yusky原创作品, 欢迎翻版,翻版不究。

声明:本站所有文章,如无特殊说明或标注,均为本站原创发布。任何个人或组织,在未征得本站同意时,禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。