Windows自動改計算機(jī)名和加入域工具-創(chuàng)新互聯(lián)

單位最近要換一批電腦，沒錢買高大上的軟件，也不準(zhǔn)用三方工具。

成都創(chuàng)新互聯(lián)是一家專注于成都做網(wǎng)站、網(wǎng)站設(shè)計、外貿(mào)營銷網(wǎng)站建設(shè)與策劃設(shè)計,西峰網(wǎng)站建設(shè)哪家好?成都創(chuàng)新互聯(lián)做網(wǎng)站,專注于網(wǎng)站建設(shè)十多年,網(wǎng)設(shè)計領(lǐng)域的專業(yè)建站公司;建站業(yè)務(wù)涵蓋:西峰等地區(qū)。西峰做網(wǎng)站價格咨詢:028-86922220

先寫個自動設(shè)置計算機(jī)名和加域的小工具，壓壓驚。

功能：

完成系統(tǒng)設(shè)置的最后一步，改計算機(jī)名，和加入域。

工作方式：

半自動，中途需要手動輸入計算機(jī)名。

待改進(jìn)：可以通過MAC與計算機(jī)名的映射表，自動獲取當(dāng)前計算機(jī)名，就是全自動了！

Readme：

注意：
修改setdoman.bat，設(shè)置域名和域管理員賬號和密碼

1、首次運(yùn)行initial-config進(jìn)行配置，如果沒有輸入系統(tǒng)當(dāng)前用戶名和密碼，系統(tǒng)不會自動登陸。
2、如果是母盤，選擇關(guān)閉計算機(jī)，重啟進(jìn)入U盤備份系統(tǒng)
3、如果是單個電腦選擇重啟
4、第一次啟動提示計算機(jī)名，輸入計算機(jī)名
5、第二次啟動加入域，腳本運(yùn)行完成自動關(guān)機(jī)
6、完成

------------
ver1
增加了防止單獨(dú)運(yùn)行setdomain誤刪腳本
增加了沒有修改默認(rèn)domain信息會提示手動輸入。

文件結(jié)構(gòu)：

└─joindomain-ver1

└─readme.txt?????????????????????????? # 使用方法

└─initial-config.bat?????????????????? # 初始化設(shè)置文件

└─start.bat???????????????????????????????# 開機(jī)調(diào)用的文件，通過start再調(diào)用改名和加域

└─modifyhostname.bat???????????# 修改計算機(jī)名文件
?????└─setdomain.bat???????????????????? # 加入域文件，還負(fù)責(zé)清理產(chǎn)生的臨時文件

每個腳本都要以管理員身份運(yùn)行，所以都需要在開頭加上下面的代碼

@echo?off
>nul?2>&1?"%SYSTEMROOT%\system32\cacls.exe"?"%SYSTEMROOT%\system32\config\system"
if?'%errorlevel%'?NEQ?'0'?(
goto?UACPrompt
)?else?(?goto?gotAdmin?)
:UACPrompt
echo?Set?UAC?=?CreateObject^("Shell.Application"^)?>?"%temp%\getadmin.vbs"
echo?UAC.ShellExecute?"%~s0",?"",?"",?"runas",?1?>>?"%temp%\getadmin.vbs"
"%temp%\getadmin.vbs"
exit?/B
:gotAdmin
if?exist?"%temp%\getadmin.vbs"?(?del?"%temp%\getadmin.vbs"?)

上腳本代碼：

initial-config.bat?

::--------------inilazition-----------
::當(dāng)前的賬號和密碼，重啟自動進(jìn)系統(tǒng)
set?/p?account-name=當(dāng)前賬戶名：
set?/p?account-pw=密碼：
::修改注冊表，開機(jī)自動進(jìn)入系統(tǒng)
reg?add?"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows?NT\CurrentVersion\Winlogon"?/v?AutoAdminLogon?/t?REG_SZ?/d?1?/f
reg?add?"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows?NT\CurrentVersion\Winlogon"?/v?DefaultPassword?/t?REG_SZ?/d?%account-pw%?/f
reg?add?"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows?NT\CurrentVersion\Winlogon"?/v?DefaultUserName?/t?REG_SZ?/d?%account-name%?/f
::復(fù)制改計算機(jī)名和加域程序到臨時路徑
set?source=%~dp0%
set?dest="C:\Users\%username%\AppData\Roaming\Microsoft\Windows\Start?Menu\Programs\Startup\"
copy?%source%modifyhostname.bat?%temp%\modifyhostname.bat
copy?%source%setdomain.bat?%temp%\setdomain.bat
copy?%source%start.bat?%dest%"start.bat"
echo?程序初始化完成
echo?制作母盤請輸入【y】，系統(tǒng)自動關(guān)機(jī)。
echo?單臺電腦輸入【n】，系統(tǒng)自動重啟。
set?/p?input-type=y/n：
if?%input-type%==y?(?
echo?系統(tǒng)正在關(guān)機(jī)，請勿操作。
shutdown?/s?/f?/t?2
goto?end
?)
echo?系統(tǒng)正在重啟，請誤操作。
shutdown?/r?/f?/t?2

start.bat

echo?IT自動化工具運(yùn)行中
if?not?exist?"%temp%\set-temp-flag.flag"?(
::運(yùn)行修改計算機(jī)名腳本
%temp%\modifyhostname.bat
)?else?(
::重啟后，運(yùn)行加入域腳本
%temp%\setdomain.bat
)
pause

modifyhostname.bat

rem?修改電腦名
set?cmscdomain=cmsc.local
set?/p?computer-name=Input?computer?name:
wmic?computersystem?where?"caption='%computername%'"?call?Rename?name='%computer-name%'
echo?1>>"%temp%\set-temp-flag.flag"
echo?%computer-name%修改完成！系統(tǒng)2秒后重啟。。。
shutdown?/f?/r?/t?2
pause

setdomain.bat

rem?此工具一閃而過，說明出錯了
::?判斷標(biāo)記文件是否存在，不存在則結(jié)束。
set?cmscdomain=default
set?domainuser=default
set?userpw=default
if?exist?"%temp%\set-temp-flag.flag"?(
echo?本名上三行不修改，提示輸入域信息。
if?%cmscdomain%==default?(?set?/p?cmscdomain="Domain?Name:"?)
if?%domainuser%==default?(?set?/p?domainuser="User?Name:"?)
if?%userpw%==default?(?set?/p?userpw="Password:"?)
wmic?computersystem?where?"caption='%computername%'"?call?JoinDomainOrWorkgroup?name="%cmscdomain%"?username="%domainuser%"?password="%userpw%"?Fjoinoptions=1

reg?delete?"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows?NT\CurrentVersion\Winlogon"?/v?AutoAdminLogon??/f
reg?delete?"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows?NT\CurrentVersion\Winlogon"?/v?DefaultPassword??/f
reg?delete?"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows?NT\CurrentVersion\Winlogon"?/v?DefaultUserName??/f
del?"C:\Users\%username%\AppData\Roaming\Microsoft\Windows\Start?Menu\Programs\Startup\start.bat"
del?"%temp%\set-temp-flag.flag"
del?"%~dp0%\modifyhostname.bat"

echo?done,Please?wait?shutdown!
shutdown?/s?/f?/t?10
del?"%~dp0%\setdomain.bat"
)
echo?沒有找到標(biāo)記文件，請按步驟運(yùn)行
pause

另外有需要云服務(wù)器可以了解下創(chuàng)新互聯(lián)scvps.cn，海內(nèi)外云服務(wù)器15元起步，三天無理由+7*72小時售后在線，公司持有idc許可證，提供“云服務(wù)器、裸金屬服務(wù)器、高防服務(wù)器、香港服務(wù)器、美國服務(wù)器、虛擬主機(jī)、免備案服務(wù)器”等云主機(jī)租用服務(wù)以及企業(yè)上云的綜合解決方案，具有“安全穩(wěn)定、簡單易用、服務(wù)可用性高、性價比高”等特點(diǎn)與優(yōu)勢，專為企業(yè)上云打造定制，能夠滿足用戶豐富、多元化的應(yīng)用場景需求。

新聞名稱：Windows自動改計算機(jī)名和加入域工具-創(chuàng)新互聯(lián)
網(wǎng)址分享：http://muchs.cn/article40/dhgcho.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供定制網(wǎng)站、面包屑導(dǎo)航、網(wǎng)站內(nèi)鏈、動態(tài)網(wǎng)站、App開發(fā)、網(wǎng)站建設(shè)

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源：創(chuàng)新互聯(lián)

猜你還喜歡下面的內(nèi)容