Helpdesk桌面運維自動化配置工具

1、精選優(yōu)質文檔-傾情為你奉上精選優(yōu)質文檔-傾情為你奉上專心-專注-專業(yè)專心-專注-專業(yè)精選優(yōu)質文檔-傾情為你奉上專心-專注-專業(yè)Helpdesk_Automatic_configuration_Tool軟件界面如下圖：以下至文檔末尾是全部代碼：#cs -AutoIt Version: 3.3.14.2Author: Miguel LouisScript Function: Helpdesk_Automatic_configuration_Tool 關于Helpdesk_Automatic_configuration_ToolHelpdesk_Automatic_configuration_Too

2、l是一款Helpdesk桌面運維自動化配置的工具，由類BASIC語言的AutoIt v3 腳本編寫，用于簡化Helpdesk大量繁復的操作，通過GUI交互，實現(xiàn)以下功能，大幅解放Helpdesk桌面工程師的時間和精力，用于更高的技術學習和提升。1. 自動設置系統(tǒng)選項2. 客戶端自動加域3. 自動安裝軟件4. 自動重啟電腦并登錄域賬戶5. 自動配置桌面環(huán)境6. 自動配置outlook及skype等配置說明：以下代碼位于134 144行，user-defined部分請根據(jù)實際需求和場景自定義Global $rootUserName = administrator ;本地管理員administrat

3、orGlobal $rootPassword = user-defined ;本地管理員密碼Global $createUserName = admin ;創(chuàng)建本地用戶名Global $createUserPassword = user-defined ;設置本地用戶名密碼Global $domainName = user-defined ;AD域名，Global $itUserName = user-defined ;IT管理員域賬戶Global $itPassword = user-defined ;IT管理員域賬戶密碼Global $fileSrvPath = user-defined

4、;安裝文件所在的共享目錄地址Global $userName ;用戶域賬號Global $userPassword ;用戶域賬戶密碼Global $hostName ;用戶計算機名使用說明：1. 該自動化運維工具適用于Microsoft Windows 7、Windows 8、Windows 10系統(tǒng)，結合企業(yè)級系統(tǒng)部署平臺MDT使用更優(yōu)2. 配置選項用于根據(jù)不同部門員工的桌面使用需求自動進行系統(tǒng)設置、安裝軟件等初始化操作，需在administraor賬戶下運行3. 用戶選項用于根據(jù)不用部門員工的桌面使用需求自動進行桌面環(huán)境配置，outlook、skype等辦公軟件登錄設置，需在用于賬戶下運行

5、4. 自動重啟系統(tǒng)+登錄賬戶 通過授予用戶本地管理員權限并修改注冊表實現(xiàn)，在系統(tǒng)重啟自動登錄用戶賬戶后，需運行取消自動登錄 和 取消管理員權限來重置注冊表并從administrators組移出用戶賬戶5. 可根據(jù)各自公司內部的實際桌面運維需求，修改該腳本代碼，從而添加、修改或刪除自動化功能模塊6. 所需安裝的軟件和工具下載放置于$fileSrvPath下，并根據(jù)存放路徑和軟件名稱修改對應模塊的代碼#ce -; Script Start - Add your code below here;請求管理員權限#RequireAdmin;#include ;#include ;#include #in

6、clude #include ; 切換為 OnEvent 模式Opt(GUIOnEventMode, 1)_main()GUISetState()Func _main() Global $Checkbox53 Global $gui_width = 490 Global $gui_height = 500 Global $checkbox_left = 5 Global $sysconf_top = 10 Global $install_top = 155 Global $user_top = 375 Global $checkbox_width = 150 Global $checkbox_

7、height = 20 Global $select_left = 5 Global $select_top = 300 Global $select_width = 50 Global $select_height = 30 GUICreate(自動化配置工具 V1.0 - By Miguel Louis, $gui_width, $gui_height) GUICtrlCreateGroup(系統(tǒng)設置, $checkbox_left, $sysconf_top, $gui_width-10, $gui_height/3-30) $Checkbox1 = GUICtrlCreateCheck

8、box(修改計算機名并加域, $checkbox_left+5, $sysconf_top+20, $checkbox_width, $checkbox_height) $Checkbox2 = GUICtrlCreateCheckbox(修改管理員密碼, $checkbox_left+160, $sysconf_top+20, $checkbox_width, $checkbox_height) $Checkbox3 = GUICtrlCreateCheckbox(創(chuàng)建本地用戶admin, $checkbox_left+320, $sysconf_top+20, $checkbox_widt

9、h, $checkbox_height) $Checkbox4 = GUICtrlCreateCheckbox(添加IT管理員組, $checkbox_left+5, $sysconf_top+50, $checkbox_width, $checkbox_height) $Checkbox5 = GUICtrlCreateCheckbox(開啟遠程桌面, $checkbox_left+160, $sysconf_top+50, $checkbox_width, $checkbox_height) $Checkbox6 = GUICtrlCreateCheckbox(安裝AD證書, $check

10、box_left+320, $sysconf_top+50, $checkbox_width, $checkbox_height) $Checkbox7 = GUICtrlCreateCheckbox(激活Office, $checkbox_left+5, $sysconf_top+80, $checkbox_width, $checkbox_height) $Checkbox8 = GUICtrlCreateCheckbox(降低UAC等級, $checkbox_left+160, $sysconf_top+80, $checkbox_width, $checkbox_height) GUI

11、CtrlCreateGroup(軟件安裝, $checkbox_left, $install_top, $gui_width-10, $gui_height/3-30) $Checkbox21 = GUICtrlCreateCheckbox(Adobe Flash Player, $checkbox_left+5, $install_top+20, $checkbox_width, $checkbox_height) $Checkbox22 = GUICtrlCreateCheckbox(Google Chrome, $checkbox_left+160, $install_top+20, $

12、checkbox_width, $checkbox_height) $Checkbox23 = GUICtrlCreateCheckbox(LinPhone for Windows, $checkbox_left+320, $install_top+20, $checkbox_width, $checkbox_height) $Checkbox24 = GUICtrlCreateCheckbox(Cisco VPN Client, $checkbox_left+5, $install_top+50, $checkbox_width, $checkbox_height) $Checkbox25

13、= GUICtrlCreateCheckbox(Minerva Pro, $checkbox_left+160, $install_top+50, $checkbox_width, $checkbox_height) $Checkbox26 = GUICtrlCreateCheckbox(Avaya one-X, $checkbox_left+320, $install_top+50, $checkbox_width, $checkbox_height) $Checkbox27 = GUICtrlCreateCheckbox(Teamviewer11to10, $checkbox_left+5

14、, $install_top+80, $checkbox_width, $checkbox_height) $Checkbox28 = GUICtrlCreateCheckbox(Teamviewer10, $checkbox_left+160, $install_top+80, $checkbox_width, $checkbox_height) GUICtrlCreateGroup(配置選項,$select_left, $select_top, $gui_width-10, $gui_height/3-100) Global $Radio1 = GUICtrlCreateRadio(銷售,

15、 $select_left+5, $select_top+20, $select_width, $select_height) Global $Radio2 = GUICtrlCreateRadio(銷售(含VPN), $select_left+55, $select_top+20, $select_width+40, $select_height) Global $Radio3 = GUICtrlCreateRadio(運營, $select_left+150, $select_top+20, $select_width, $select_height) Global $Radio4 = G

16、UICtrlCreateRadio(售后, $select_left+200, $select_top+20, $select_width, $select_height) GUICtrlCreateGroup(用戶選項,$select_left, $user_top, $gui_width-10, $gui_height/3-100) $Checkbox43 = GUICtrlCreateCheckbox(銷售, $checkbox_left+5, $user_top+20, $checkbox_width-100, $checkbox_height+10) $Checkbox44 = GU

17、ICtrlCreateCheckbox(運營, $checkbox_left+65, $user_top+20, $checkbox_width-100, $checkbox_height+10) $Checkbox45 = GUICtrlCreateCheckbox(售后, $checkbox_left+135, $user_top+20, $checkbox_width-100, $checkbox_height+10) $Checkbox41 = GUICtrlCreateCheckbox(取消自動登錄, $checkbox_left+205, $user_top+20, $checkb

18、ox_width-50, $checkbox_height+10) $Checkbox42 = GUICtrlCreateCheckbox(取消管理員權限, $checkbox_left+305, $user_top+20, $checkbox_width-50, $checkbox_height+10) $Checkbox51 = GUICtrlCreateCheckbox(自動重啟系統(tǒng)+登錄賬戶, $select_left+90, $user_top+85, $select_width+100, $select_height) Global $Radio11 = GUICtrlCreate

19、Radio(全選, $select_left+260, $user_top+85, $select_width, $select_height) Global $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 $Bu

20、tton2 = 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) GUICtrlSetOnEve

21、nt($Radio11,_chooseAll) GUICtrlSetOnEvent($Radio12,_chooseNone) GUICtrlSetOnEvent($Checkbox43,_userStation) GUICtrlSetOnEvent($Checkbox44,_userCreditAduit) GUICtrlSetOnEvent($Checkbox45,_userCollection) GUICtrlSetOnEvent($Button1,_action) GUICtrlSetOnEvent($Button2,_exit) GUISetOnEvent($GUI_EVENT_CL

22、OSE,_exit) Global $_run53 $_run1 = _run1 ;修改計算機名并加域 $_run2 = _run2;修改管理員密碼 $_run3 = _run3 ;創(chuàng)建Admin用戶 $_run4 = _run4;添加IT服務臺 $_run5 = _run5 ;開啟遠程桌面 $_run6 = _run6 ;安裝AD證書 $_run7 = _run7;激活Office $_run8 = _run8;降低UAC等級 $_run21 = _run21 ;安裝Adobe Flash Player $_run22 = _run22 ;安裝Google Chrome $_run23 =

23、_run23 ;安裝LinPhone for Windows $_run24 = _run24 ;安裝Cisco VPN Client $_run25 = _run25 ;安裝Minerva Pro $_run26 = _run26 ;安裝Avaya one-X $_run27 = _run27 ;卸載TeamViewer11，安裝TeamViewer10 $_run28 = _run28 ;安裝TeamViewer10 $_run41 = _run41 ;取消自動登錄 $_run42 = _run42 ;取消管理員權限 $_run43 = _run43 ;銷售用戶配置 $_run44 = _

24、run44 ;運營用戶配置 $_run45 = _run45 ;售后用戶配置 $_run51 = _run51 ;自動重啟系統(tǒng) Global $rootUserName = administrator ;本地管理員administrator Global $rootPassword = user-defined ;本地管理員密碼 Global $createUserName = admin ;創(chuàng)建本地用戶名 Global $createUserPassword = user-defined ;設置本地用戶名密碼 Global $domainName = user-defined ;AD域名，

25、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()

26、 For $i = 1 to 52 GUICtrlSetState($Checkbox$i,4) Next GUICtrlSetState($Checkbox1,1) GUICtrlSetState($Checkbox2,1) GUICtrlSetState($Checkbox3,1) GUICtrlSetState($Checkbox4,1) GUICtrlSetState($Checkbox5,1) GUICtrlSetState($Checkbox6,1) GUICtrlSetState($Checkbox7,1) GUICtrlSetState($Checkbox21,1) GUICt

27、rlSetState($Checkbox51,1) GUICtrlSetState($Radio11,4) GUICtrlSetState($Radio12,4)EndFunc;銷售(含VPN)Func _chooseStationWithVPN() For $i = 1 to 52 GUICtrlSetState($Checkbox$i,4) Next GUICtrlSetState($Checkbox1,1) GUICtrlSetState($Checkbox2,1) GUICtrlSetState($Checkbox3,1) GUICtrlSetState($Checkbox4,1) G

28、UICtrlSetState($Checkbox5,1) GUICtrlSetState($Checkbox6,1) GUICtrlSetState($Checkbox7,1) GUICtrlSetState($Checkbox21,1) GUICtrlSetState($Checkbox24,1) GUICtrlSetState($Checkbox51,1) GUICtrlSetState($Radio11,4) GUICtrlSetState($Radio12,4)EndFunc;運營Func _chooseCreditAduit() For $i = 1 to 52 GUICtrlSet

29、State($Checkbox$i,4) Next GUICtrlSetState($Checkbox1,1) GUICtrlSetState($Checkbox2,1) GUICtrlSetState($Checkbox4,1) GUICtrlSetState($Checkbox5,1) GUICtrlSetState($Checkbox6,1) GUICtrlSetState($Checkbox7,1) GUICtrlSetState($Checkbox21,1) GUICtrlSetState($Checkbox23,1) GUICtrlSetState($Checkbox51,1) G

30、UICtrlSetState($Radio11,4) GUICtrlSetState($Radio12,4)EndFunc;售后Func _chooseCollection() For $i = 1 to 52 GUICtrlSetState($Checkbox$i,4) Next GUICtrlSetState($Checkbox1,1) GUICtrlSetState($Checkbox2,1) GUICtrlSetState($Checkbox4,1) GUICtrlSetState($Checkbox5,1) GUICtrlSetState($Checkbox6,1) GUICtrlS

31、etState($Checkbox7,1) GUICtrlSetState($Checkbox8,1) GUICtrlSetState($Checkbox21,1) GUICtrlSetState($Checkbox25,1) GUICtrlSetState($Checkbox26,1) GUICtrlSetState($Checkbox51,1) GUICtrlSetState($Radio11,4) GUICtrlSetState($Radio12,4)EndFunc;選中“銷售用戶配置”同時選中“安裝Google ChromeFunc _userStation() If _GUICtrl

32、Button_GetCheck($Checkbox43) Then GUICtrlSetState($Checkbox41,1) GUICtrlSetState($Checkbox42,1) EndIfEndFunc;選中“運營用戶配置”同時選中“安裝Google ChromeFunc _userCreditAduit() If _GUICtrlButton_GetCheck($Checkbox44) Then GUICtrlSetState($Checkbox22,1) GUICtrlSetState($Checkbox41,1) GUICtrlSetState($Checkbox42,1)

33、 EndIfEndFunc;選中“售后用戶配置”同時選中“安裝Google ChromeFunc _userCollection() If _GUICtrlButton_GetCheck($Checkbox45) Then GUICtrlSetState($Checkbox41,1) GUICtrlSetState($Checkbox42,1) EndIfEndFunc;全選Func _chooseAll() For $i = 1 to 40 GUICtrlSetState($Checkbox$i,1) Next For $i = 41 to 46 GUICtrlSetState($Check

34、box$i,4) Next GUICtrlSetState($Checkbox51,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) Next GUICtrlSetState($Radio1,4) GUICtrlSet

35、State($Radio2,4) GUICtrlSetState($Radio3,4) GUICtrlSetState($Radio4,4) GUICtrlSetState($Radio11,4)EndFunc;運行Func _action() For $i = 1 to 52 If _GUICtrlButton_GetCheck($Checkbox$i) Then $_run$i() EndIf NextEndFunc;用戶配置Func _userConf() Run(C:Program FilesMicrosoft OfficeOffice16OUTLOOK.EXE) WinWaitAct

36、ive(歡迎使用 Microsoft Outlook 2016,歡迎使用 Outlook 2016) SLEEP(0 xF4) Send(!n) WinWaitActive(Microsoft Outlook 賬戶設置,使用 Outlook 連接到電子郵件帳戶) SLEEP(0 xF4) Send(!n) WinWaitActive(添加帳戶,電子郵件帳戶(&A) SLEEP(0 xE8) Send(!n) SLEEP(0 xD0) If WinExists(安全警告) Then ;如果提示未安裝域證書則自動進行安裝 If IsAdmin() Then WinMinimizeAll() Run

37、(explorer $fileSrvPathADCA.cer) WinWaitActive(證書,證書信息) SLEEP(0 xF4) Send(!i) WinWaitActive(證書導入向導,歡迎使用證書導入向導) SLEEP(0 xF4) Send(!n) WinWaitActive(證書導入向導,證書存儲是保存證書的系統(tǒng)區(qū)域) SLEEP(0 xF4) Send(!p) SLEEP(0 xF4) Send(!r) WinWaitActive(選擇證書存儲,選擇要使用的證書存儲) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) ControlClick(選擇證書

38、存儲,選擇要使用的證書存儲,Button1,left,1) WinWaitActive(證書導入向導,證書存儲是保存證書的系統(tǒng)區(qū)域) SLEEP(0 xF4) Send(!n) WinWaitActive(證書導入向導,正在完成證書導入向導) SLEEP(0 xF4) ControlClick(證書導入向導,正在完成證書導入向導,Button6,left,1) Local $i = 0 While $i = 3000If WinExists(安全性警告) Then WinActivate(安全性警告,您即將從一個聲稱代表如下的證書頒發(fā)機構安裝證書) WinWaitActive(安全性警告,您即

39、將從一個聲稱代表如下的證書頒發(fā)機構安裝證書) SLEEP(0 xF4) Send(!y)Else SLEEP(0 xE8) $i = $i + 1000EndIf WEnd WinActivate(證書導入向導,導入成功) WinWaitActive(證書導入向導,導入成功) SLEEP(0 xF4) ControlClick(證書導入向導,導入成功,Button1,left,1) WinWaitActive(證書,證書信息) SLEEP(0 xF4) Send(!i) WinWaitActive(證書導入向導,歡迎使用證書導入向導) SLEEP(0 xF4) Send(!n) WinWait

40、Active(證書導入向導,證書存儲是保存證書的系統(tǒng)區(qū)域) SLEEP(0 xF4) Send(!p) SLEEP(0 xF4) Send(!r) WinWaitActive(選擇證書存儲,選擇要使用的證書存儲) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) ControlClick(選擇證書存儲,選擇要使用的證書存儲,Button1,left,1) WinWaitActive(證書導入向導,證書存儲是保存證書的系統(tǒng)區(qū)域)

41、SLEEP(0 xF4) Send(!n) WinWaitActive(證書導入向導,正在完成證書導入向導) SLEEP(0 xF4) ControlClick(證書導入向導,正在完成證書導入向導,Button6,left,1) WinWaitActive(證書導入向導,導入成功) SLEEP(0 xF4) ControlClick(證書導入向導,導入成功,Button1,left,1) WinWaitActive(證書,證書信息) SLEEP(0 xF4) ControlClick(證書,證書信息,Button5,left,1) WinWaitClose(證書,證書信息) Else RunA

42、s($rootUserName,ComputerName,$rootPassWord,0,certutil -addstore -f Root $fileSrvPathADCA.cer,) EndIf WinActivate(安全警告) WinWaitActive(安全警告) SLEEP(0 xF4) Send(!y) WinWaitActive(添加帳戶,恭喜您! 您的電子郵件帳戶已成功配置并已準備就緒) SLEEP(0 xF4) ControlClick(添加帳戶,恭喜您! 您的電子郵件帳戶已成功配置并已準備就緒,Button9,left,1) ElseIf WinExists(添加帳戶,

43、恭喜您! 您的電子郵件帳戶已成功配置并已準備就緒) Then WinActivate(添加帳戶,恭喜您! 您的電子郵件帳戶已成功配置并已準備就緒) WinWaitActive(添加帳戶,恭喜您! 您的電子郵件帳戶已成功配置并已準備就緒) SLEEP(0 xF4) ControlClick(添加帳戶,恭喜您! 您的電子郵件帳戶已成功配置并已準備就緒,Button9,left,1) EndIf WinWaitActive(TeamViewer會議插件) SLEEP(0 xF4) Send(ENTER) WinWaitClose(TeamViewer會議插件) WinWaitActive(首要事項)

44、 SLEEP(0 xF4) Send(!l) SLEEP(0 xF4) Send(!a) SLEEP(0 xF4) WinMinimizeAll() SLEEP(0 xF4) Run(C:Program FilesMicrosoft OfficeOffice16lync.exe) WinWaitActive(Skype for Business,查找聯(lián)系人或聊天室) Exit #cs SLEEP(0 xE8) If WinExists(快速提示) Then WinClose(快速提示) WinWaitClose(快速提示) EndIf SLEEP(0 xE8) If WinExists(Sky

45、pe for Business,關閉程序) Then WinActivate(Skype for Business,關閉程序) WinWaitActive(Skype for Business,關閉程序) SLEEP(0 xF4) Send(!c) WinWaitClose(Skype for Business,關閉程序) Else Exit EndIf #ceEndFunc;自動登錄域賬戶Func _autoLogin() WinMinimizeAll() If IsAdmin() Then If $userName = Then Global $userName = InputBox(輸入

46、,請輸入用戶名：,) Global $userPassword = InputBox(輸入,請輸入密碼：,) EndIf ShellExecute(SystemDir & compmgmt.msc) WinWaitActive(計算機管理,計算機管理(本地) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(RIGHT) SLEEP(0 xF4) Send(DOWN) S

47、LEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(TAB) SLEEP(0 xF4) Send(ENTER) WinWaitActive(Administrators 屬性,常規(guī)) SLEEP(0 xF4) Send(!d) WinWaitActive(選擇用戶、計算機、服務帳戶或組,選擇此對象類型(&S):) SLEEP(0 xF4) ControlSetText(選擇用戶、計算機、服務帳戶或組,選擇此對象類型(&S):,RichEdit20W1,$userName) SLEEP(0 xF4) Send(!c) WinWaitActive(Windows 安全

48、) SLEEP(0 xF4) ControlSetText(Windows 安全,Edit1,$itUserName) SLEEP(0 xF4) ControlSetText(Windows 安全,Edit2,$itPassword) SLEEP(0 xF4) ControlClick(Windows 安全,Button2,left,1) WinWaitActive(選擇用戶、計算機、服務帳戶或組,選擇此對象類型(&S):) SLEEP(0 xF4) ControlClick(選擇用戶、計算機、服務帳戶或組,選擇此對象類型(&S):,Button5,left,1) WinWaitActive(

49、Administrators 屬性,常規(guī)) SLEEP(0 xF4) ControlClick(Administrators 屬性,常規(guī),Button3,left,1) WinActivate(計算機管理,本地用戶和組組) WinWaitActive(計算機管理,本地用戶和組組) SLEEP(0 xF4) WinClose(計算機管理,本地用戶和組組) WinWaitClose(計算機管理,計算機管理(本地) SLEEP(0 xF4) RegWrite(HKEY_LOCAL_MACHINE64SOFTWAREMicrosoftWindows NTCurrentVersionWinlogon,

50、AutoAdminLogon, REG_SZ, 1) RegWrite(HKEY_LOCAL_MACHINE64SOFTWAREMicrosoftWindows NTCurrentVersionWinlogon, DefaultDomainName, REG_SZ, $domainName) RegWrite(HKEY_LOCAL_MACHINE64SOFTWAREMicrosoftWindows NTCurrentVersionWinlogon, DefaultUserName, REG_SZ, $userName) RegWrite(HKEY_LOCAL_MACHINE64SOFTWARE

51、MicrosoftWindows NTCurrentVersionWinlogon, Defaultpassword, REG_SZ, $userPassword) Else ;RunAs($rootUserName,ComputerName,$rootPassword,0,ShellExecute(SystemDir & compmgmt.msc) MsgBox(64,警告,當前用戶無權操作本地管理員組！,2) EndIfEndFunc;自動重啟Func _autoReboot() WinMinimizeAll() MsgBox(64,提示,已完成初始化配置！系統(tǒng)將自動重啟！,3) Shut

52、down(6)EndFunc;修改計算機名并加域Func _run1() WinMinimizeAll() SLEEP(0 xE8) Global $userName = InputBox(輸入,請輸入用戶名：,) Global $userPassword = InputBox(輸入,請輸入密碼：,) Global $hostName = InputBox(輸入,請輸入計算機名：,) If IsAdmin() Then Run(control sysdm.cpl) Else RunAs($rootUserName,ComputerName,$rootPassword,0,control sys

53、dm.cpl) EndIf WinWaitActive(系統(tǒng)屬性,計算機名) SLEEP(0 xF4) Send(!c) WinWaitActive(計算機名/域更改,計算機名(&C):) SLEEP(0 xF4) WinActivate(計算機名/域更改,計算機名(&C):) ControlSetText(計算機名/域更改,計算機名(&C):,Edit1,$hostName) SLEEP(0 xF4) ControlCommand(計算機名/域更改,計算機名(&C):,Button3,Check) SLEEP(0 xF4) ControlSetText(計算機名/域更改,計算機名(&C):,

54、Edit3,$domainName) SLEEP(0 xF4) ControlClick(計算機名/域更改,計算機名(&C):,Button6,left,1) WinWaitActive(Windows 安全) SLEEP(0 xF4) ControlSetText(Windows 安全,Edit1,$itUserName) SLEEP(0 xF4) ControlSetText(Windows 安全,Edit2,$itPassword) SLEEP(0 xF4) ControlClick(Windows 安全,Button2,left,1) WinWaitActive(計算機名/域更改,歡迎

55、加入) SLEEP(0 xF4) ControlClick(計算機名/域更改,歡迎加入,Button1,left,1) Local $i = 0 While $i = 8000 If WinExists(計算機名/域更改,帳戶名與安全標識間無任何映射完成) Then WinActivate(計算機名/域更改,帳戶名與安全標識間無任何映射完成) WinWaitActive(計算機名/域更改,帳戶名與安全標識間無任何映射完成) SLEEP(0 xF4) Send(ENTER) ExitLoop Else SLEEP(0 xE8) $i = $i + 1000 EndIf WEnd WinWaitA

56、ctive(計算機名/域更改,確定) SLEEP(0 xF4) Send(ENTER) WinWaitActive(系統(tǒng)屬性,計算機名) SLEEP(0 xF4) ControlClick(系統(tǒng)屬性,計算機名,Button3,left,1) WinWaitActive(Microsoft Windows) SLEEP(0 xF4) Send(!l) WinWaitClose(Microsoft Windows)EndFunc;修改本地管理員密碼Func _run2() WinMinimizeAll() If IsAdmin() Then Run(net user administrator &

57、 $rootPassword) SLEEP(0 xE8) Else RunAs($rootUserName,ComputerName,$rootPassword,0,net user administrator & $rootPassword,) SLEEP(0 xE8) EndIfEndFunc;創(chuàng)建admin用戶Func _run3() WinMinimizeAll() If IsAdmin() Then Run(net user & $createUserName & & $createUserPassword & /add) Run(net localgroup users & $cr

58、eateUserName & /add) ShellExecute(SystemDir & compmgmt.msc) WinWaitActive(計算機管理,計算機管理(本地) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(RIGHT) SLEEP(0 xF4) Send(DOWN) SLEEP(0 xF4) Send(TAB) SLEEP(0 xF4) Send(

59、ENTER) WinWaitActive(admin 屬性,常規(guī)) SLEEP(0 xF4) ControlCommand(admin 屬性,常規(guī),Button2,Check,) SLEEP(0 xF4) ControlCommand(admin 屬性,常規(guī),Button3,Check,) SLEEP(0 xF4) ControlClick(admin 屬性,常規(guī),Button6,left,1) WinActivate(計算機管理,計算機管理(本地) WinWaitActive(計算機管理,計算機管理(本地) SLEEP(0 xF4) WinClose(計算機管理,計算機管理(本地) WinW

60、aitClose(計算機管理,計算機管理(本地) Else ;RunAs($rootUserName,ComputerName,$rootPassword,0,net user admin Password1 /add /passwordchg:no,) ;RunAs($rootUserName,ComputerName,$rootPassword,0,net localgroup users admin /add,) ;RunAs($rootUserName,ComputerName,$rootPassword,0,ShellExecute(SystemDir & compmgmt.msc)