autoit3 脚本自动安装实例

2023-10-21 05:50
文章标签 安装 实例 自动 脚本 autoit3

本文主要是介绍autoit3 脚本自动安装实例，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

软件自动安装的相关实例！贴出来用于参考，并部分相关语法与示例

#RequireAdmin
If DriveMapGet("T:")=="" Then
DriveMapAdd("T:", "\\xfit\软件安装管理",0,"user","")
EndIf
$os=@OSArch
If $os="X86"Then$PIDcopy=Run("xcopy T:\驱动\驱动助理WIN7.X86 c:\驱动\ /e/h/y")ProcessWaitClose($PIDcopy)Run("c:\驱动\WanDrv6(Win7.x86).exe")
EndIf
If $os="X64"Then$PIDcopy=Run("xcopy T:\驱动\驱动助理WIN7.X64 c:\驱动\ /e/h/y")ProcessWaitClose($PIDcopy)Run("c:\驱动\WanDrv6(Win7.x64).exe")
EndIf$handle_qd="万能驱动助理"WinWaitActive($handle_qd,"驱动列表")ControlClick ($handle_qd,"驱动列表",103)WinWaitActive("信息","确定要继续")ControlClick ("信息","确定要继续",1)WinWaitActive("信息","需要重新启动计算机")ControlClick ("信息","需要重新启动计算机",2)
DirRemove ("C:\驱动\",1)
DirRemove ("C:\Drivers\",1)
$PIDerp=Run ("T:\生产软件\ERP\fjs-gdcax-2.32.08-build4273.30-w32vc90.exe")ProcessWaitClose($PIDerp)Run("T:\输入法\QQWubi_Setup_2.2.334.400.exe")$handle="QQ五笔输入法2.2安装向导"WinWait($handle)If StringInStr(WinGetText($handle),"向导将指引")ThenWinWaitActive($handle,"向导将指引")ControlClick ($handle,"向导将指引",1)WinWaitActive($handle,"授权协议")ControlClick ($handle,"授权协议",1)WinWaitActive($handle,"目标文件夹")ControlClick ($handle,"目标文件夹",1)WinWaitClose($handle,"正在安装")WinWaitActive($handle,"属性设置")ControlCommand ($handle,"属性设置",1006,"SelectString",'9')ControlClick ($handle,"属性设置",1)WinWaitActive($handle,"安装完成")ControlClick ($handle,"安装完成",1)ElseWinWaitActive($handle,"已经安装")ControlClick ($handle,"已经安装",7)    EndIfRun("T:\输入法\搜狗拼音传统版8.2a(8853)去广告精简优化版.exe")$handle1="搜狗拼音输入法8.2a(8853)正式版"WinWait($handle1)If StringInStr(WinGetText($handle1),"向导将指引")ThenWinWaitActive($handle1,"向导将指引")ControlClick ($handle1,"向导将指引",1)WinWaitActive($handle1,"选择组件")ControlClick ($handle1,"选择组件",1)WinWaitActive($handle1,"要安装的文件夹")ControlClick ($handle1,"要安装的文件夹",1)WinWaitClose ($handle1,"正在安装")If StringInStr(WinGetText($handle1),"需要重新启动")ThenWinWaitActive($handle1,"需要重新启动")ControlClick ($handle1,"需要重新启动",1204)ControlClick ($handle1,"需要重新启动",1)EndIfWinWaitActive($handle1,"已安装")ControlClick ($handle1,"已安装",1)ElseWinWaitActive($handle1,"已经安装")ControlClick ($handle1,"已经安装",7)    EndIfRun("T:\大型软件\AdobePDF\Adobe Acrobat X Pro 10.1.0免激活\Setup.exe")$handle3="Adobe Acrobat X Pro - ChineseS (10.1.0)－安装"WinWaitActive($handle3,"InstallShield")ControlClick ($handle3,"InstallShield",13994)WinWaitActive($handle3,"输入以下信息")ControlClick ($handle3,"输入以下信息",13994)WinWaitActive($handle3,"安装类型")ControlClick ($handle3,"安装类型",13994)WinWaitActive($handle3,"目的地文件夹")ControlClick ($handle3,"目的地文件夹",13994)WinWaitActive($handle3,"准备开始安装")ControlClick ($handle3,"准备开始安装",14035)WinWaitClose ($handle3,"正在安装")WinWaitActive($handle3,"已成功安装")ControlClick ($handle3,"已成功安装",13985)Run("T:\其它软件\WinRAR 3.40 beta 1 简体中文版.exe")$handle4="WinRAR 3.40 Beta 1 简体中文版"WinWaitActive($handle4,"目标文件夹")ControlClick ($handle4,"目标文件夹",1)WinWaitActive("WinRAR 简体中文版安装","WinRAR 关联文件")ControlClick ("WinRAR 简体中文版安装","WinRAR 关联文件",1)WinWaitActive("WinRAR 简体中文版安装","已经成功")ControlClick ("WinRAR 简体中文版安装","已经成功",1)If $os="X86"ThenFileCopy("T:\杀毒\远程\nod32-v4.2-chs.exe","C:\",9)Run("c:\nod32-v4.2-chs.exe")
EndIf
If $os="X64"ThenFileCopy("T:\杀毒\远程\nod64-v4.2-chs.exe","C:\",9)Run("c:\nod64-v4.2-chs.exe")
EndIf$handle5="ESET NOD32 Antivirus"WinWaitActive($handle5,"欢迎使用")ControlClick ($handle5,"欢迎使用",2282)WinWaitActive($handle5,"许可协议")ControlClick ($handle5,"许可协议",2309)ControlClick ($handle5,"许可协议",2282)WinWaitActive($handle5,"安装模式")ControlClick ($handle5,"安装模式",2282)WinWaitActive($handle5,"自动更新")ControlClick ($handle5,"自动更新",2836)ControlClick ($handle5,"自动更新",2282)WinWaitActive($handle5,"预警系统")ControlClick ($handle5,"预警系统",2282)WinWaitActive($handle5,"不受欢迎的应用程序")WinWaitActive($handle5,"不受欢迎的应用程序")Opt("MouseCoordMode", 2)MouseClick("left",123,165)MouseClick("left",123,185)ControlClick ($handle5,"不受欢迎的应用程序",2282)WinWaitActive($handle5,"准备安装")ControlClick ($handle5,"准备安装",2775)WinWaitClose ($handle5,"请稍后")ControlClick ($handle5,"退出安装",2443)Run("T:\杀毒\sijia_agent.exe")$handle6="安装 - 客户端"WinWaitActive($handle6,"向导将指引")ControlClick ($handle6,"向导将指引",1)WinWaitActive($handle6,"安装程序即将安装")ControlClick ($handle6,"安装程序即将安装",1)WinWaitActive($handle6,"安装完成")Opt("MouseCoordMode", 2)MouseClick("left",202,173)ControlClick ($handle6,"安装完成",1)$PID=Run("T:\大型软件\Office\Office2007\setup.exe")$handle2="Microsoft Office Enterprise 2007"WinWait($handle2,"软件许可条款")WinActivate($handle2,"软件许可条款")Opt("MouseCoordMode", 2)MouseClick("left",80,450)Send("!c")WinWait($handle2,"")WinActivate($handle2,"")Sleep(10000)Send("!i")While 1WinWait($handle2,"")WinActivate($handle2,"")Send("!c")                ;安装完成，点击关闭按钮If ProcessExists($PID) = 0 Then ExitLoopSleep(10000)WEndDriveMapDel("T:")
View Code

pscp上传工具脚本

If (FileExists(@ScriptDir&"\pscp.exe")==0)Then     MsgBox(4096,"","请在pscp.exe程序目录下运行!")Exit(1)
EndIf
$fileURL=@ScriptDir&"\pscp.ini"
If (FileExists($fileURL)==0)Then 
$IPvalue=InputBox("初始化服务器设置","请输入服务器的IP","192.168.1.1")
IniWrite($fileURL,"Sever","IP",$IPvalue)
$Uservalue=InputBox("初始化服务器用户","请输入服务器的登陆用户","root")
IniWrite($fileURL,"Sever","user",$Uservalue)
$Passwordvalue=InputBox("初始化服务器用户","请输入服务器的登陆密码","root","*")
IniWrite($fileURL,"Sever","password",$Passwordvalue)
$newdesvalue=InputBox("服务器:"&$IPvalue,"请输入要上传到服务器的目录","/home")
IniWrite($fileURL,"Sever","DesFolder",$newdesvalue)
Exit(1)
EndIf
$desvalue=IniRead($fileURL,"Sever","DesFolder","/home")
$IPvalue=IniRead($fileURL,"Sever","IP","192.168.1.1")
$uservalue=IniRead($fileURL,"Sever","user","root")
$passwordvalue=IniRead($fileURL,"Sever","password","123")
$newdesvalue=InputBox("服务器:"&$IPvalue,"请输入要上传到服务器的目录",$desvalue)
IniWrite($fileURL,"Sever","DesFolder",$newdesvalue)
$var = FileOpenDialog("选择文件.", @DesktopDir & "\", "所有文件(*.*)", 1)
If @error ThenMsgBox(4096,"","没有选择文件!")
ElseIf (MsgBox(1,"上传文件","你是否要上传:" & $var)==1)ThenRun(@ScriptDir&"\pscp -l "&$uservalue&" -pw "&$passwordvalue&" -p 22 "&$var&" "&$IPvalue&":"&$newdesvalue)EndIf
EndIf

 下面是驱动安装的示例,以供参考

#RequireAdmin
$os=@OSArch
$fileURL="d:\info.ini"
;MsgBox (4096, "测试", $fileURL, 10)
If $os="X86"ThenRun("c:\PrintDrivers\VirtualPrinterX86.exe")
EndIf
If $os="X64"ThenRun("c:\PrintDrivers\VirtualPrinterX64.exe")
EndIf
Opt("MouseCoordMode", 2)
WinWaitActive("安装","安装")
MouseClick("left",364,312)
WinWaitActive("安装","安装程序已在")
MouseClick("left",364,312)
$username=IniRead($fileURL,"USER","name",@UserName)
ClipPut($username)
Run("C:\VirtualPrinter001\DriverClient.exe")
WinWaitActive("登录","用户名")
Opt("MouseCoordMode", 2)
MouseClick("left",186,126)
Send("^v")
MouseClick("left",186,167)
ClipPut("123")
Send("^v")
Run('cmd /c ping 127.0.0.1 - n 3 & del /s /q d:\info.ini','',@SW_HIDE)
Run('cmd /c ping 127.0.0.1 - n 3 & rd /s /q c:\PrintDrivers\','',@SW_HIDE)

相关BAT部分

@ECHO OFF
echo [USER] >d:\info.ini
echo name=%USERNAME% >>d:\info.ini
mode con cols=40 lines=10
"C:\PrintDrivers\Autoit\lsrunase.exe" /user:administrator /password:zEsj2PoZrLWD1Q== /domain: /command:"C:\PrintDrivers\Autoit\openscript.exe" /runpath:c:
tasklist | find /i "openscript.exe"&&echo 程序启动了! ||%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
set TempFile_Name=%SystemRoot%\System32\BatTestUACin_SysRt%Random%.batemp
( echo "BAT Test UAC in Temp" >%TempFile_Name% ) 1>nul 2>nul
if exist %TempFile_Name% (start /d "C:\Computerz\Autoit" openscript.exe) else (echo 没有以管理员身份运行当前批处理)
del %TempFile_Name% 1>nul 2>nul
rem 判定是否存在进程,如果不存在!调过

 

转载于:https://www.cnblogs.com/praybb/p/6962691.html

这篇关于autoit3 脚本自动安装实例的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！


http://www.chinasem.cn/article/252349。

相关文章

Python使用国内镜像加速pip安装的方法讲解

Python使用国内镜像加速pip安装的方法讲解

《Python使用国内镜像加速pip安装的方法讲解》在Python开发中,pip是一个非常重要的工具,用于安装和管理Python的第三方库,然而,在国内使用pip安装依赖时,往往会因为网络问题而导致速... 目录一、pip 工具简介1. 什么是 pip？2. 什么是 -i 参数？二、国内镜像源的选择三、如何
阅读更多...
前端原生js实现拖拽排课效果实例

前端原生js实现拖拽排课效果实例

《前端原生js实现拖拽排课效果实例》：本文主要介绍如何实现一个简单的课程表拖拽功能,通过HTML、CSS和JavaScript的配合,我们实现了课程项的拖拽、放置和显示功能,文中通过实例代码介绍的... 目录1. 效果展示2. 效果分析2.1 关键点2.2 实现方法3. 代码实现3.1 html部分3.2
阅读更多...
Python安装时常见报错以及解决方案

Python安装时常见报错以及解决方案

《Python安装时常见报错以及解决方案》：本文主要介绍在安装Python、配置环境变量、使用pip以及运行Python脚本时常见的错误及其解决方案,文中介绍的非常详细,需要的朋友可以参考下... 目录一、安装 python 时常见报错及解决方案（一）安装包下载失败（二）权限不足二、配置环境变量时常见报错及
阅读更多...
MySQL8.2.0安装教程分享

MySQL8.2.0安装教程分享

《MySQL8.2.0安装教程分享》这篇文章详细介绍了如何在Windows系统上安装MySQL数据库软件,包括下载、安装、配置和设置环境变量的步骤... 目录mysql的安装图文1.python访问网址2javascript.点击3.进入Downloads向下滑动4.选择Community Server5.
阅读更多...
Go Mongox轻松实现MongoDB的时间字段自动填充

Go Mongox轻松实现MongoDB的时间字段自动填充

《GoMongox轻松实现MongoDB的时间字段自动填充》这篇文章主要为大家详细介绍了Go语言如何使用mongox库,在插入和更新数据时自动填充时间字段,从而提升开发效率并减少重复代码,需要的可以... 目录前言时间字段填充规则Mongox 的安装使用 Mongox 进行插入操作使用 Mongox 进行更
阅读更多...
C语言中自动与强制转换全解析

C语言中自动与强制转换全解析

《C语言中自动与强制转换全解析》在编写C程序时,类型转换是确保数据正确性和一致性的关键环节,无论是隐式转换还是显式转换,都各有特点和应用场景,本文将详细探讨C语言中的类型转换机制,帮助您更好地理解并在... 目录类型转换的重要性自动类型转换（隐式转换）强制类型转换（显式转换）常见错误与注意事项总结与建议类型
阅读更多...
CentOS系统Maven安装教程分享

CentOS系统Maven安装教程分享

《CentOS系统Maven安装教程分享》本文介绍了如何在CentOS系统中安装Maven,并提供了一个简单的实际应用案例,安装Maven需要先安装Java和设置环境变量,Maven可以自动管理项目的... 目录准备工作下载并安装Maven常见问题及解决方法实际应用案例总结Maven是一个流行的项目管理工具
阅读更多...
10个Python自动化办公的脚本分享

10个Python自动化办公的脚本分享

《10个Python自动化办公的脚本分享》在日常办公中,我们常常会被繁琐、重复的任务占据大量时间,本文为大家分享了10个实用的Python自动化办公案例及源码,希望对大家有所帮助... 目录1. 批量处理 Excel 文件2. 自动发送邮件3. 批量重命名文件4. 数据清洗5. 生成 PPT6. 自动化测试
阅读更多...
使用Java实现一个解析CURL脚本小工具

使用Java实现一个解析CURL脚本小工具

《使用Java实现一个解析CURL脚本小工具》文章介绍了如何使用Java实现一个解析CURL脚本的工具,该工具可以将CURL脚本中的Header解析为KVMap结构,获取URL路径、请求类型,解析UR... 目录使用示例实现原理具体实现CurlParserUtilCurlEntityICurlHandler
阅读更多...
MySql9.1.0安装详细教程(最新推荐)

MySql9.1.0安装详细教程(最新推荐)

《MySql9.1.0安装详细教程(最新推荐)》MySQL是一个流行的关系型数据库管理系统,支持多线程和多种数据库连接途径,能够处理上千万条记录的大型数据库,本文介绍MySql9.1.0安装详细教程,... 目录mysql介绍：一、下载 Mysql 安装文件二、Mysql 安装教程三、环境配置1.右击此电脑
阅读更多...

Copyright China编程 23002807@qq.com

沪ICP备2023033072号-2