Helpdesk桌面运维自动化配置工具学习资料

Hel pdes k 桌面运维自动化配置工具Helpdesk_Automatic_configuration_Tool软件界面如下图:以下至文档末尾是全部代码：#cs ---------------------------------------------------------------------------AutoIt Versio n: 3.3.14.2Author: Miguel LouisScript Function:Helpdesk_Automatic_c on figurati on _Tool关于Helpdesk_Automatic_configuration_ToolHelpdesk_Automatic_configuration_Tool 是一款Helpdesk桌面运维自动化配置的工具，由类BASIC语言的Autolt v3脚本编写，用于简化Helpdesk大量繁复的操作，通过GUI交互，实现以下功能，大幅解放Helpdesk桌面工程师的时间和精力，用于更高的技术学习和提升。

1. 自动设置系统选项2. 客户端自动加域3. 自动安装软件4. 自动重启电脑并登录域账户5. 自动配置桌面环境6. 自动配置outlook及skype等配置说明：以下代码位于134 ~ 144行，user-defined部分请根据实际需求和场景自定义Global $rootUserName = "administrator" ;本地管理员administratorGlobal $rootPassword = "user-defined" 本; 地管理员密码Global $createUserName = "admin" 创; 建本地用户名Global $createUserPassword = "user-defi ned"设置本地用户名密码Global $domainName = "user-defined" ;AD 域名，Global $itUserName = "user-defi ned" ;IT 管理员域账户Global $itPassword = "user-defi ned" ;IT 管理员域账户密码Global $fileSrvPath = "user-defined" ;安装文件所在的共享目录地址Global $userName ;用户域账号Global $userPassword 用; 户域账户密码Global $hostName ;用户计算机名使用说明：1. 该自动化运维工具适用于Microsoft Windows 7 、Windows 8、Windows 10 系统，结合企业级系统部署平台MDT 使用更优2. 配置选项用于根据不同部门员工的桌面使用需求自动进行系统设置、安装软件等初始化操作，需在administraor 账户下运行3. 用户选项用于根据不用部门员工的桌面使用需求自动进行桌面环境配置，outlook、skype等办公软件登录设置，需在用于账户下运行4. 自动重启系统+登录账户通过授予用户本地管理员权限并修改注册表实现，在系统重启自动登录用户账户后，需运行取消自动登录和取消管理员权限来重置注册表并从administrators组移出用户账户5. 可根据各自公司内部的实际桌面运维需求，修改该脚本代码，从而添加、修改或删除自动化功能模块6. 所需安装的软件和工具下载放置于$fileSrvPath下，并根据存放路径和软件名称修改对应模块的代码#ce --------------------------------------------------------------------------- ; Script Start - Add your code below here;;请求管理员权限#RequireAdmin;#include <ButtonConstants.au3>;#include <GUIConstantsEx.au3>;#include <WindowsConstants.au3>#include <GUIConstants.au3>#include <GuiButton.au3> ; 切换为OnEvent 模式Opt("GUIOnEventMode", 1)_main()GUISetState()Func _main()Global $Checkbox[53]Global $gui_width = 490Global $gui_height = 500Global $checkbox_left = 5Global $sysconf_top = 10Global $install_top = 155Global $user_top = 375Global $checkbox_width = 150Global $checkbox_height = 20Global $select_left = 5Global $select_top = 300Global $select_width = 50Global $select_height = 30GUICreate(”自动化配置工具V1.0 - By Miguel Louis", $gui_width, $gui_height)GUICtrlCreateGroup(”系统设置", $checkbox_left, $sysconf_top, $gui_width-10, $gui_height/3-30)$Checkbox[1] = GUICtrlCreateCheckbox("修改计算机名并加域",$checkbox_left+5, $sysconf_top+20, $checkbox_width, $checkbox_height) $Checkbox[2] = GUICtrlCreateCheckbox("修改管理员密码", $checkbox_left+160, $sysconf_top+20, $checkbox_width, $checkbox_height)$Checkbox[3] = GUICtrlCreateCheckbox('创建本地用户admin",$checkbox_left+320, $sysconf_top+20, $checkbox_width, $checkbox_height) $Checkbox[4] = GUICtrlCreateCheckbox("添加IT 管理员组", $checkbox_left+5,$sysconf_top+50, $checkbox_width, $checkbox_height)$Checkbox[5] = GUICtrlCreateCheckbox("开启远程桌面", $checkbox_left+160, $sysconf_top+50, $checkbox_width, $checkbox_height)$Checkbox[6] = GUICtrlCreateCheckbox("安装AD 证书", $checkbox_left+320, $sysconf_top+50, $checkbox_width, $checkbox_height)$Checkbox[7] = GUICtrlCreateCheckbox("激活Office", $checkbox_left+5, $sysconf_top+80, $checkbox_width, $checkbox_height)$Checkbox[8] = GUICtrlCreateCheckbox("降低UAC 等级", $checkbox_left+160, $sysconf_top+80, $checkbox_width, $checkbox_height)GUICtrlCreateGroup("软件安装", $checkbox_left, $install_top, $gui_width-10, $gui_height/3-30)$Checkbox[21] = GUICtrlCreateCheckbox("Adobe Flash Player",$checkbox_left+5, $install_top+20, $checkbox_width, $checkbox_height) $Checkbox[22] = GUICtrlCreateCheckbox("Google Chrome", $checkbox_left+160, $install_top+20, $checkbox_width, $checkbox_height)$Checkbox[23] = GUICtrlCreateCheckbox("LinPhone for Windows",$checkbox_left+320, $install_top+20, $checkbox_width, $checkbox_height) $Checkbox[24] = GUICtrlCreateCheckbox("Cisco VPN Client", $checkbox_left+5, $install_top+50, $checkbox_width, $checkbox_height)$Checkbox[25] = GUICtrlCreateCheckbox("Minerva Pro", $checkbox_left+160, $install_top+50, $checkbox_width, $checkbox_height)$Checkbox[26] = GUICtrlCreateCheckbox("Avaya one-X", $checkbox_left+320, $install_top+50, $checkbox_width, $checkbox_height)$Checkbox[27] = GUICtrlCreateCheckbox("Teamviewer11to10",$checkbox_left+5, $install_top+80, $checkbox_width, $checkbox_height) $Checkbox[28] = GUICtrlCreateCheckbox("Teamviewer10", $checkbox_left+160, $install_top+80, $checkbox_width, $checkbox_height)G U -2「-c「e a (D G「o u p (=I E »&^=sse-ecfl-efLsse-ec 匚o psguilwidfh —lpSguilheighu3二00)G-oba- SRado'1 H G U -2「-c「e a (D R a d i o (=^e =sse-ecfl-eff+psse-ec匚OP+2Psse-ecflwidfmsse-ecf —heighoG-oba-SRado'2H G U -2「-c「e a (D R a d i o (=^e (n>VPN)=sse-ecfl-eff+5psse-ec匚O P +2Psse-ecflwidfh+4psse-ecf —heighoG-oba- SRado'3H G U -2r -c r e a (D R a d i o (=^rt =sse-ecfl-eff±5psse-ec 匚op+20一sse-ecflwidfmsse-ecf —heighoG-oba-SRado'4H G U -2「-c「e a (D R a d i o (=e可=sse-ecfl-eff+20psse-ec 匚 op+20一sse-ecflwidfmsse-ecf —heighoG U -2r -c r e a (D G「o u p (-^Y &^=sse-ecfl-efLs u s e r -lo p sguilwidfh —lpSguilheighu3二 00)「「suse 「lfop+2pscheckboxlwidfh —1 o pscheckboxIheightMO)scheckbo><441 H G U -2r -c r e a (D c h e c k b o x (=^rt =scheckboxl-eft+6psuse「lfop+2pscheckboxlwidfh —1 o pscheckboxIheightMO)scheckbo><451 H G U -2「-c「e a (D c h e c k b o x (=e /f =scheckboxl-eft+13psuse「lfop+2pscheckboxlwidfh —1 o pscheckboxIheightMO)scheckbo><4二HGU_2「_c「ea(Dcheckbox(=®羔皿劇®池=scheckboxl_eft+205一suse 「lfop+2pscheckboxlwidfh —5pscheckboxIheightMO)scheckbo><421 HGU_2「_c「ea(Dcheckbox(=®羔哺輻沏商俞=scheckboxl-eft+30psuse 「lfop+2pscheckboxlwidfh —5pscheckboxIheightMO)scheckboxa二HGU_2「_c 「ea(Dcheckbox(-血劇刪诃洲渎 +糜池w >=sse-ecfl-eft+9psuser_fop+8psse-ecf —widfh+lopsse-ecf —heighoG-oba-SRadio二H G U -2「-c「e a (D R a d i o (=a &=sse-ecfl-eff+26psuser_fop+8psse-ecflwidfmsse-ecf —heighoGlobal $Radio12 = GUICtrlCreateRadio(" 全不选", $select_left+320, $user_top+85, $select_width+10, $select_height)Global $Button1 = GUICtrlCreateButton(" 运行(&A)", $select_left, $user_top+80, $select_width+20, $select_height)Global $Button2 = GUICtrlCreateButton(" 退出(&E)", $select_left+410,$user_top+80, $select_width+20, $select_height)GUICtrlSetOnEvent($Radio1,"_chooseStation")GUICtrlSetOnEvent($Radio2,"_chooseStationWithVPN")GUICtrlSetOnEvent($Radio3,"_chooseCreditAduit")GUICtrlSetOnEvent($Radio4,"_chooseCollection")GUICtrlSetOnEvent($Radio11,"_chooseAll")GUICtrlSetOnEvent($Radio12,"_chooseNone")GUICtrlSetOnEvent($Checkbox[43],"_userStation")GUICtrlSetOnEvent($Checkbox[44],"_userCreditAduit")GUICtrlSetOnEvent($Checkbox[45],"_userCollection")GUICtrlSetOnEvent($Button1,"_action") GUICtrlSetOnEvent($Button2,"_exit") GUISetOnEvent($GUI_EVENT_CLOSE,"_exit")Global $_run[53]$_run[1] = _run1 ;修改计算机名并加域$_run[2] = _run2 ;修改管理员密码$_run[3] = _run3 ;创建Admin 用户$_run[4] = _run4 ;添加IT 服务台$_run[5] = _run5 ;开启远程桌面$_run[6] = _run6 ;安装AD 证书$_run[7] = _run7 ;激活Office$_run[8] = _run8 ;降低UAC 等级$_run[21] = _run21 ;安装Adobe Flash Player$_run[22] _run22 ;安装Google Chrome$_run[23] _run23 ;安装LinPhone for Windows$_run[24] _run24 ;安装Cisco VPN Client$_run[25] _run25 ;安装Minerva Pro$_run[26] _run26 ;安装Avaya one-X$_run[27] =」un27 卸载TeamViewerll，安装TeamViewerlO$_run[28] _run28 ;安装TeamViewer10$_run[41] _run41 ;取消自动登录$_run[42] _run42 ;取消管理员权限$_run[43] _run43 ;销售用户配置$_run[44] _run44 ;运营用户配置$_run[45] _run45 ;售后用户配置$_run[51] _run51 ;自动重启系统Global $rootUserName = "administrator" ;本地管理员administrator Global $rootPassword = "user-defined" 本; 地管理员密码Global $createUserName = "admin" 创; 建本地用户名Global $createUserPassword = "user-defi ned"设置本地用户名密码Global $domainName = "user-defined" ;AD 域名，Global $itUserName = "user-defined" ;IT 管理员域账户Global $itPassword = "user-defined" ;IT 管理员域账户密码Global $fileSrvPath = "user-defined" ;安装文件所在的共享目录地址Global $userName ; 用户域账号Global $userPassword 用; 户域账户密码Global $hostName ;用户计算机名EndFuncWhile 1 sleep(1000)WEnd;;关闭程序Func _exit()ExitEndFunc;;销售Func _chooseStation()For $i = 1 to 52 GUICtrlSetState($Checkbox[$i],4)NextGUICtrlSetState($Checkbox[1],1)GUICtrlSetState($Checkbox[2],1)GUICtrlSetState($Checkbox[3],1)GUICtrlSetState($Checkbox[4],1)GUICtrlSetState($Checkbox[5],1)GUICtrlSetState($Checkbox[6],1)GUICtrlSetState($Checkbox[7],1)GUICtrlSetState($Checkbox[21],1)GUICtrlSetState($Checkbox[51],1)GUICtrlSetState($Radio11,4)GUICtrlSetState($Radio12,4)EndFunc;;销售(含VPN)Func _chooseStationWithVPN()For $i = 1 to 52 GUICtrlSetState($Checkbox[$i],4) NextGUICtrlSetState($Checkbox[1],1) GUICtrlSetState($Checkbox[2],1) GUICtrlSetState($Checkbox[3],1) GUICtrlSetState($Checkbox[4],1) GUICtrlSetState($Checkbox[5],1) GUICtrlSetState($Checkbox[6],1) GUICtrlSetState($Checkbox[7],1)GUICtrlSetState($Checkbox[21],1) GUICtrlSetState($Checkbox[24],1)GUICtrlSetState($Checkbox[51],1)GUICtrlSetState($Radio11,4)GUICtrlSetState($Radio12,4)EndFunc;;运营Func _chooseCreditAduit()For $i = 1 to 52 GUICtrlSetState($Checkbox[$i],4) NextGUICtrlSetState($Checkbox[1],1) GUICtrlSetState($Checkbox[2],1)GUICtrlSetState($Checkbox[4],1) GUICtrlSetState($Checkbox[5],1) GUICtrlSetState($Checkbox[6],1) GUICtrlSetState($Checkbox[7],1)GUICtrlSetState($Checkbox[21],1) GUICtrlSetState($Checkbox[23],1)GUICtrlSetState($Checkbox[51],1)GUICtrlSetState($Radio11,4)GUICtrlSetState($Radio12,4)EndFunc;;售后Func _chooseCollection()For $i = 1 to 52 GUICtrlSetState($Checkbox[$i],4)NextGUICtrlSetState($Checkbox[1],1)GUICtrlSetState($Checkbox[2],1)GUICtrlSetState($Checkbox[4],1)GUICtrlSetState($Checkbox[5],1)GUICtrlSetState($Checkbox[6],1)GUICtrlSetState($Checkbox[7],1)GUICtrlSetState($Checkbox[8],1)GUICtrlSetState($Checkbox[21],1)GUICtrlSetState($Checkbox[25],1)GUICtrlSetState($Checkbox[26],1)GUICtrlSetState($Checkbox[51],1)GUICtrlSetState($Radio11,4)GUICtrlSetState($Radio12,4)EndFunc ;;选中“销售用户配置”同时选中“安装Google Chrome" Func _userStation()If _GUICtrlButton_GetCheck($Checkbox[43]) ThenGUICtrlSetState($Checkbox[41],1)GUICtrlSetState($Checkbox[42],1)EndIfEndFunc;;选中“运营用户配置”同时选中“安装Google Chrome"Func _userCreditAduit()If _GUICtrlButton_GetCheck($Checkbox[44]) ThenGUICtrlSetState($Checkbox[22],1)GUICtrlSetState($Checkbox[41],1)GUICtrlSetState($Checkbox[42],1)EndIfEndFunc;;选中“售后用户配置”同时选中“安装Google Chrome"Func _userCollection()If _GUICtrlButton_GetCheck($Checkbox[45]) ThenGUICtrlSetState($Checkbox[41],1)GUICtrlSetState($Checkbox[42],1)EndIfEndFunc;;全选Func _chooseAll()For $i = 1 to 40GUICtrlSetState($Checkbox[$i],1)NextFor $i = 41 to 46GUICtrlSetState($Checkbox[$i],4)NextGUICtrlSetState($Checkbox[51],1)GUICtrlSetState($Radio1,4)GUICtrlSetState($Radio2,4)GUICtrlSetState($Radio3,4)GUICtrlSetState($Radio4,4)GUICtrlSetState($Radio12,4)EndFunc ;;全不选Func _chooseNone()For $i = 1 to 52 GUICtrlSetState($Checkbox[$i],4)NextGUICtrlSetState($Radio1,4)GUICtrlSetState($Radio2,4)GUICtrlSetState($Radio3,4)GUICtrlSetState($Radio4,4)GUICtrlSetState($Radio11,4)EndFunc;;运行Func _action()For $i = 1 to 52If _GUICtrlButton_GetCheck($Checkbox[$i]) Then $_run[$i]()EndIfNextEndFunc;;用户配置Func _userConf()Run("C:\Program Files\Microsoft Office\Office16\OUTLOOK.EXE")WinWaitActive(" 欢迎使用Microsoft Outlook 2016"," 欢迎使用Outlook 2016")SLEEP(0x000001F4)Send("!n")WinWaitActive("Microsoft Outlook 账户设置"," 使用Outlook 连接到电子邮件帐户")SLEEP(0x000001F4)Send("!n")WinWaitActive(" 添加帐户"," 电子邮件帐户(&A)")SLEEP(0x000003E8)Send("!n")SLEEP(0x000007D0)If WinExists(" 安全警告") Then ; 如果提示未安装域证书则自动进行安装If IsAdmin() ThenWinMinimizeAll()Run("explorer $fileSrvPath\AD\CA.cer")WinWaitActive(" 证书"," 证书信息")SLEEP(0x000001F4)Send("!i")WinWaitActive(" 证书导入向导"," 欢迎使用证书导入向导")SLEEP(0x000001F4)Send("!n")WinWaitActive(" 证书导入向导"," 证书存储是保存证书的系统区域")SLEEP(0x000001F4)Send("!p")SLEEP(0x000001F4)Send("!r")WinWaitActive(" 选择证书存储"," 选择要使用的证书存储")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)ControlClick(" 选择证书存储"," 选择要使用的证书存储","Button1","left",1)WinWaitActive(" 证书导入向导"," 证书存储是保存证书的系统区域")SLEEP(0x000001F4)Send("!n")WinWaitActive(" 证书导入向导"," 正在完成证书导入向导")SLEEP(0x000001F4)ControlClick(" 证书导入向导"," 正在完成证书导入向导","Button6","left",1)Local $i = 0While $i <= 3000If WinExists(" 安全性警告") ThenWinActivate(" 安全性警告"," 您即将从一个声称代表如下的证书颁发机构安装证书")WinWaitActive(" 安全性警告"," 您即将从一个声称代表如下的证书颁发机构安装证书")SLEEP(0x000001F4)Send("!y")ElseSLEEP(0x000003E8)$i = $i + 1000EndIfWEndWinActivate(" 证书导入向导"," 导入成功")WinWaitActive(" 证书导入向导"," 导入成功")SLEEP(0x000001F4)ControlClick(" 证书导入向导"," 导入成功","Button1","left",1)WinWaitActive(" 证书"," 证书信息")SLEEP(0x000001F4)Send("!i")WinWaitActive(" 证书导入向导"," 欢迎使用证书导入向导")SLEEP(0x000001F4)Send("!n")WinWaitActive(" 证书导入向导"," 证书存储是保存证书的系统区域")SLEEP(0x000001F4)Send("!p")SLEEP(0x000001F4)Send("!r")WinWaitActive(" 选择证书存储"," 选择要使用的证书存储")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)ControlClick（" 选择证书存储"," 选择要使用的证书存储","Button1","left",1）WinWaitActive（" 证书导入向导"," 证书存储是保存证书的系统区域"）SLEEP（0x000001F4）Send（"!n"）WinWaitActive（" 证书导入向导"," 正在完成证书导入向导"） SLEEP（0x000001F4）ControlClick（" 证书导入向导"," 正在完成证书导入向导","Button6","left",1）WinWaitActive（" 证书导入向导"," 导入成功"） SLEEP（0x000001F4）ControlClick（" 证书导入向导"," 导入成功","Button1","left",1）WinWaitActive（" 证书"," 证书信息"）SLEEP（0x000001F4）ControlClick（" 证书"," 证书信息","Button5","left",1）Win WaitClose（"证书","证书信息"）ElseRunAs（$rootUserName,@ComputerName,$rootPassWord,0,"certutil - addstore -f Root $fileSrvPath\AD\CA.cer",""）EndIfWinActivate（" 安全警告"）WinWaitActive（" 安全警告"）SLEEP（0x000001F4）Send（"!y"）WinWaitActive（" 添加帐户","恭喜您! 您的电子邮件帐户已成功配置并已准备就绪"）SLEEP（0x000001F4）ControlClick（" 添加帐户","恭喜您! 您的电子邮件帐户已成功配置并已准备就绪","Button9","left",1）Elself WinExists（"添加帐户","恭喜您！您的电子邮件帐户已成功配置并已准备就绪"） ThenWinActivate（" 添加帐户","恭喜您！您的电子邮件帐户已成功配置并已准备就绪"）WinWaitActive（" 添加帐户","恭喜您！您的电子邮件帐户已成功配置并已准备就绪"）SLEEP（0x000001F4）ControlClick（" 添加帐户","恭喜您！您的电子邮件帐户已成功配置并已准备就绪","Button9","left",1）EndlfWinWaitActive（"TeamViewer 会议插件"）SLEEP（0x000001F4）Send（"{ENTER}"）WinWaitClose（"TeamViewer 会议插件"）WinWaitActive（" 首要事项"）SLEEP（0x000001F4）Send（"！l"）SLEEP（0x000001F4）Send（"！a"）SLEEP（0x000001F4）WinMinimizeAll（）SLEEP（0x000001F4）Run（"C:\Program Files\Microsoft Office\Office16\lync.exe"）WinWaitActive（"Skype for Business"," 查找联系人或聊天室"）Exit#csSLEEP（0x000003E8）lf WinExists（" 快速提示"） ThenWinClose(" 快速提示")WinWaitClose(" 快速提示")EndIf SLEEP(0x000003E8)If WinExists("Skype for Business"," 关闭程序") ThenWinActivate("Skype for Business"," 关闭程序")WinWaitActive("Skype for Business"," 关闭程序")SLEEP(0x000001F4) Send("!c")WinWaitClose("Skype for Business"," 关闭程序")ElseExitEndIf#ceEndFunc;;自动登录域账户Func _autoLogin()WinMinimizeAll()If IsAdmin() Then If $userName == "" ThenGlobal $userName = In putBox("输入","请输入用户名：","")Global $userPassword = In putBox(输入","请输入密码：","") EndIfShellExecute(@SystemDir & "\compmgmt.msc")WinWaitActive(" 计算机管理"," 计算机管理(本地)")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{RIGHT}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{TAB}")SLEEP(0x000001F4)Send("{ENTER}")WinWaitActive("Administrators 属性","常规")SLEEP(0x000001F4)Send("!d")WinWaitActive(" 选择用户、计算机、服务帐户或组"," 选择此对象类型(&S):")SLEEP(0x000001F4)Con trolSetText("选择用户、计算机、服务帐户或组","选择此对象类型(&S):","RichEdit20W1",$userName)SLEEP(0x000001F4)Send("!c")WinWaitActive("Windows 安全")SLEEP(0x000001F4)Con trolSetText("Wi ndows 安全","","Edit1",$itUserName)SLEEP(0x000001F4)Con trolSetText("Wi ndows 安全","","Edit2",$itPassword)SLEEP(0x000001F4)ControlClick("Windows 安全","","Button2","left",1)WinWaitActive(" 选择用户、计算机、服务帐户或组","选择此对象类型(&S):") SLEEP(0x000001F4)ControlClick(" 选择用户、计算机、服务帐户或组"," 选择此对象类型(&S):","Button5","left",1)WinWaitActive("Administrators 属性","常规")SLEEP(0x000001F4)ControlClick("Administrators 属性"," 常规","Button3","left",1)WinActivate(" 计算机管理"," 本地用户和组组")WinWaitActive(" 计算机管理"," 本地用户和组组") SLEEP(0x000001F4)Win Close("计算机管理","本地用户和组组")Win WaitClose("计算机管理","计算机管理(本地)")SLEEP(0x000001F4)RegWrite("HKEY_LOCAL_MACHINE64\SOFTWARE\Microsoft\WindowsNT\CurrentVersion\Winlogon", "AutoAdminLogon", "REG_SZ", "1")RegWrite("HKEY_LOCAL_MACHINE64\SOFTWARE\Microsoft\WindowsNT\CurrentVersion\Winlogon", "DefaultDomainName", "REG_SZ", $domainName) RegWrite("HKEY_LOCAL_MACHINE64\SOFTWARE\Microsoft\WindowsNT\CurrentVersion\Winlogon", "DefaultUserName", "REG_SZ", $userName)RegWrite("HKEY_LOCAL_MACHINE64\SOFTWARE\Microsoft\WindowsNT\CurrentVersion\Winlogon", "Defaultpassword", "REG_SZ", $userPassword) Else ;RunAs($rootUserName,@ComputerName,$rootPassword,0,ShellExecute(@ SystemDir & "\compmgmt.msc"))MsgBox(64,"警告","当前用户无权操作本地管理员组！",2)EndIfEndFunc ;;自动重启Func _autoReboot()WinMinimizeAll()MsgBox（64,"提示","已完成初始化配置！系统将自动重启！",3）Shutdown(6)EndFunc;;修改计算机名并加域Func _run1()WinMinimizeAll()SLEEP(0x000003E8)Global $userName = In putBox('输入","请输入用户名：","")Global $userPassword = In putBox(输入","请输入密码：","")Global $hostName = In putBox('输入","请输入计算机名：","")If IsAdmin() ThenRun("control sysdm.cpl")ElseRunAs($rootUserName,@ComputerName,$rootPassword,0,"control sysdm.cpl")EndIfWinWaitActive(" 系统属性","计算机名")SLEEP(0x000001F4)Send("!c")WinWaitActive(" 计算机名/域更改","计算机名(&C):")SLEEP(0x000001F4)WinActivate(" 计算机名/域更改","计算机名(&C):")ControlSetTextC计算机名/域更改","计算机名(&C):","Edit1",$hostName) SLEEP(0x000001F4)ControlCommand('计算机名/域更改","计算机名(&C):","Button3","Check") SLEEP(0x000001F4)Con trolSetTextC 计算机名/ 域更改","计算机名(&C)：TEdit3",$doma in Name)SLEEP(0x000001F4)ControlClick("计算机名/域更改","计算机名(&C)：TButton6","left",1) WinWaitActive("Windows 安全")SLEEP(0x000001F4)Con trolSetText("Wi ndows 安全TTEdit1",$itUserName)SLEEP(0x000001F4)Con trolSetText("Wi ndows 安全","","Edit2",$itPassword)SLEEP(0x000001F4)ControlClick("Windows 安全TTButton2","left",1)WinWaitActive(" 计算机名/域更改" ,"欢迎加入" )SLEEP(0x000001F4)ControlClick("计算机名/域更改","欢迎加入TButton1","left",1)Local $i = 0While $i <= 8000If WinExists(" 计算机名/域更改","帐户名与安全标识间无任何映射完成") ThenWinActivate(" 计算机名/域更改","帐户名与安全标识间无任何映射完成")WinWaitActive(" 计算机名/域更改"," 帐户名与安全标识间无任何映射完成")SLEEP(0x000001F4)Send("{ENTER}") ExitLoopElseSLEEP(0x000003E8) $i = $i + 1000EndIfWEndWinWaitActive(" 计算机名/域更改","确定")SLEEP(0x000001F4)Send("{ENTER}")WinWaitActive(" 系统属性"," 计算机名")SLEEP(0x000001F4)ControlClick(" 系统属性"," 计算机名","Button3","left",1)WinWaitActive("Microsoft Windows")SLEEP(0x000001F4)Send("!l")WinWaitClose("Microsoft Windows")EndFunc;;修改本地管理员密码Func _run2()WinMinimizeAll()If IsAdmin() ThenRun("net user administrator " & $rootPassword)SLEEP(0x000003E8)ElseRunAs($rootUserName,@ComputerName,$rootPassword,0,"net user administrator " & $rootPassword,"")SLEEP(0x000003E8)EndIfEndFunc;;创建admin 用户Func _run3()WinMinimizeAll()If IsAdmin() ThenRun("net user " & $createUserName & " " & $createUserPassword & " /add")Run("net localgroup users " & $createUserName & " /add")ShellExecute(@SystemDir & "\compmgmt.msc")WinWaitActive(" 计算机管理","计算机管理(本地)")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{RIGHT}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{TAB}")SLEEP(0x000001F4)Send("{ENTER}")WinWaitActive("admin 属性"," 常规")SLEEP(0x000001F4)ControlCommand("admin 属性"," 常规","Button2","Check","")SLEEP(0x000001F4)ControlCommand("admin 属性"," 常规","Button3","Check","")SLEEP(0x000001F4)ControlClick("admin 属性","常规","Button6","left",1)WinActivate(" 计算机管理","计算机管理(本地)")WinWaitActive(" 计算机管理","计算机管理(本地)")SLEEP(0x000001F4)WinClose("计算机管理","计算机管理(本地)")Win WaitClose("计算机管理","计算机管理(本地)")Else;RunAs($rootUserName,@ComputerName,$rootPassword,0,"net user admin Password@1 /add /passwordchg:no","");RunAs($rootUserName,@ComputerName,$rootPassword,0,"net localgroup users admin /add","");RunAs($rootUserName,@ComputerName,$rootPassword,0,ShellExecute(@ SystemDir & "\compmgmt.msc"))MsgBox(64,"警告","当前用户无权操作本地账户！",2)EndIfEndFunc;;添力卩ITservice组至administrators组Func _run4()WinMinimizeAll()If IsAdmin() ThenShellExecute(@SystemDir & "\compmgmt.msc")WinWaitActive(" 计算机管理" , "计算机管理(本地)")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{RIGHT}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{DOWN}")SLEEP(0x000001F4)Send("{TAB}")SLEEP(0x000001F4)Send("{ENTER}")WinWaitActive("Administrators 属性","常规")SLEEP(0x000001F4)Send("!d")WinWaitActive(" 选择用户、计算机、服务帐户或组" , "选择此对象类型(&S):")SLEEP(0x000001F4)Con trolSetText("选择用户、计算机、服务帐户或组","选择此对象类型(&S):","RichEdit20W1","itservice")SLEEP(0x000001F4)Send("!c")WinWaitActive("Windows 安全") SLEEP(0x000001F4)Con trolSetText("Wi ndows 安全","","Edit1",$itUserName)SLEEP(0x000001F4)Con trolSetText("Wi ndows 安全","","Edit2",$itPassword)SLEEP(0x000001F4)ControlClick("Windows 安全","","Button2","left",1)WinWaitActive(" 选择用户、计算机、服务帐户或组","选择此对象类型(&S):") SLEEP(0x000001F4)ControlClick(" 选择用户、计算机、服务帐户或组","选择此对象类型(&S):","Button5","left",1)Local $i = 0While $i <= 1000If WinExists("本地用户和组",'"IT服务台"已经在列表中')ThenWinActivate(" 本地用户和组",'"IT 服务台" 已经在列表中')WinWaitActive(" 本地用户和组",'"IT 服务台" 已经在列表中')SLEEP(0x000001F4)ControlClick(" 本地用户和组",'"IT 服务台" 已经在列表中',"Button1","left",1)ExitLoopElse SLEEP(0x000001F4)$i = $i + 500EndIfWEndWinWaitActive("Administrators 属性","常规") SLEEP(0x000001F4)ControlClick("Administrators 属性"," 常规","Button3","left",1)WinActivate(" 计算机管理"," 本地用户和组组")WinWaitActive(" 计算机管理"," 本地用户和组组")SLEEP(0x000001F4)Win Close("计算机管理","本地用户和组组")Win WaitClose("计算机管理","计算机管理(本地)")Else;RunAs($rootUserName,@ComputerName,$rootPassword,0,ShellExecute(@ SystemDir & "\compmgmt.msc"))MsgBox(64,"警告","当前用户无权操作本地管理员组！",2)EndIf。