在完成了Windows XP下×××自動(dòng)創(chuàng)建并配置連接后，其實(shí)我們還需要對Windows 7下×××自動(dòng)配置做一個(gè)介紹，因?yàn)槟壳皩?shí)際上很多企業(yè)也已經(jīng)開始進(jìn)行了大批量的Windows 7的使用，而且很多用戶目前也在逐漸向Windows 7系統(tǒng)邁進(jìn)，那么如何讓W(xué)indows 7用戶也能有不錯(cuò)的用戶體驗(yàn)?zāi)?#xff1f;如何簡化這些用戶的×××創(chuàng)建也成為了我們需要考慮的內(nèi)容，繼續(xù)前面的內(nèi)容我來分享一下，我在Windows 7下的配置。 在Windows 7的×××批處理腳本中除了實(shí)現(xiàn)“Windows XP下×××連接自動(dòng)配置批處理腳本”一文中所述的5點(diǎn)功能外，還實(shí)現(xiàn)了在TMG-×××中完成的SSTP_×××模式時(shí)注冊表的導(dǎo)入，當(dāng)然，我們說只有您的企業(yè)中已經(jīng)安裝并配置好了SSTP—×××?xí)r可能您才需要導(dǎo)入這個(gè)注冊表鍵值，如果僅僅是需要完成×××的自動(dòng)創(chuàng)建配置，那么也可不添加這部分的批處理腳本內(nèi)容。 好，接下來，我們就一起來看看如何在Windows 7下實(shí)現(xiàn)×××連接自動(dòng)創(chuàng)建吧。 @echo off & color 5a echo ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: echo?????????????????????????? Windows 7_×××連接配置 echo ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: echo?????????????? 配置過程中，請勿進(jìn)行任何操作，以保證配置順利完成！ echo.???????????????????????????? echo.???????????????????????????????????? 祝您工作愉快、順利！ echo. echo 確認(rèn)安裝配置×××請按任意鍵繼續(xù)！ pause cls
@echo off
echo 正在檢查×××1.Test.com是否存在，請稍等……
@echo off
choice /t 5 /d y /n>nul ?
find "×××1.Test.com" %USERPROFILE%\AppData\Roaming\Microsoft\Network\Connections\Pbk\rasphone.pbk && goto :×××2.Test.com || goto :add×××1.Test.com
:×××2.Test.com
@echo off
cls
echo ×××1.Test.com已經(jīng)存在或創(chuàng)建完成!
cls
echo 正在檢查×××2.Test.com是否存在，請稍等……
@echo off
choice /t 5 /d y /n>nul ?
find "×××2.Test.com" %USERPROFILE%\AppData\Roaming\Microsoft\Network\Connections\Pbk\rasphone.pbk && goto :×××3.Test.com || goto :add×××2.Test.com
:×××3.Test.com
@echo off
cls
echo ×××2.Test.com已經(jīng)存在或創(chuàng)建完成!
cls
echo 正在檢查×××3.Test.com是否存在，請稍等……
@echo off
choice /t 5 /d y /n>nul ?
find "×××3.Test.com" %USERPROFILE%\AppData\Roaming\Microsoft\Network\Connections\Pbk\rasphone.pbk && goto :no || goto :add×××3.Test.com
pause
:add×××1.Test.com @echo off
echo 正在創(chuàng)建PEKD1.Vancl.cn連接，請稍等……
?? echo set WshShell = CreateObject("WScript.Shell") >Test_×××.VBS
?? echo WshShell.Run "Rasphone -a" >>Test_×××.VBS ?
?? echo WScript.Sleep 500 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+W" >> Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+I" >> Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "×××1.Test.com" >> Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+E" >>Test_×××.VBS
?? echo WScript.Sleep 500 >> Test_×××.VBS
?? echo WshShell.SendKeys "×××1.Test.com" >> Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+N" >>Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+C" >> Test_×××.VBS
?? start Test_×××.VBS
cls
echo 正在完成×××1.Test.com_×××連接配置，請稍等！
ping 127.0.0.1 -n 10>nul ?
cls
echo ×××1.Test.com連接創(chuàng)建完成，即將為您創(chuàng)建×××1.Test.com桌面快捷方式，請稍等……
ping 127.0.0.1 -n 10>nul ?
(echo set ws=createobject("wscript.shell"^) echo ws.run "cmd /c ncpa.cpl",0 echo wscript.sleep 1000 echo ws.sendkeys "{f5}" echo wscript.sleep 1000 echo ws.sendkeys "×××1.Test.com" echo wscript.sleep 500 echo ws.sendkeys "%%{f}" echo wscript.sleep 500 echo ws.sendkeys "{s}" echo wscript.sleep 300 echo ws.sendkeys "{y}" echo wscript.sleep 300 echo ws.sendkeys "%%{f4}")>%temp%\Test_×××.vbs start /wait %temp%\Test_×××.vbs
cls
echo ×××1.Test.com桌面快捷方式創(chuàng)建完成，即將為您配置×××2.Test.com連接，請稍等……
ping 127.0.0.1 -n 10>nul ?
goto:×××2.Test.com
:add×××2.Test.com
echo 正在創(chuàng)建PEKD2.Vancl.cn連接，請稍等……
?? echo set WshShell = CreateObject("WScript.Shell") >Test_×××.VBS
?? echo WshShell.Run "Rasphone -a" >> Test_×××.VBS
?? echo WScript.Sleep 500 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+W" >>Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+I" >>Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "×××2.Test.com" >>Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+E" >>Test_×××.VBS
?? echo WScript.Sleep 500 >> Test_×××.VBS
?? echo WshShell.SendKeys "×××2.Test.com" >>Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+N" >>Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+C" >>Test_×××.VBS
?? start Test_×××.VBS
cls
echo 正在完成×××2.Test.com_×××連接配置，請稍等！
ping 127.0.0.1 -n 10>nul ?
cls
echo ×××2.Test.com連接創(chuàng)建完成，即將為您創(chuàng)建×××2.Test.com桌面快捷方式，請稍等……
ping 127.0.0.1 -n 10>nul ?
(echo set ws=createobject("wscript.shell"^) echo ws.run "cmd /c ncpa.cpl",0 echo wscript.sleep 1000 echo ws.sendkeys "{f5}" echo wscript.sleep 1000 echo ws.sendkeys "×××2.Test.com" echo wscript.sleep 500 echo ws.sendkeys "%%{f}" echo wscript.sleep 500 echo ws.sendkeys "{s}" echo wscript.sleep 300 echo ws.sendkeys "{y}" echo wscript.sleep 300 echo ws.sendkeys "%%{f4}")>%temp%\Test_×××.vbs start /wait %temp%\Test_×××.vbs cls
echo ×××2.Test.com桌面快捷方式創(chuàng)建完成，即將為您配置×××3.Test.com連接，請稍等……
ping 127.0.0.1 -n 10>nul ?
goto:×××3.Test.com
:add×××3.Test.com
echo 正在創(chuàng)建×××3.Test.com連接，請稍等……
?? echo set WshShell = CreateObject("WScript.Shell") >Test_×××.VBS
?? echo WshShell.Run "Rasphone -a" >> Test_×××.VBS
?? echo WScript.Sleep 500 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+W" >>Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+I" >>Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "×××3.Test.com" >>Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+E" >>Test_×××.VBS
?? echo WScript.Sleep 500 >> Test_×××.VBS
?? echo WshShell.SendKeys "×××3.Test.com" >>Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+N" >>Test_×××.VBS
?? echo WScript.Sleep 100 >> Test_×××.VBS
?? echo WshShell.SendKeys "%%+C" >>Test_×××.VBS
?? start Test_×××.VBS
cls
echo 正在完成×××3.Test.com_×××連接配置，請稍等！
ping 127.0.0.1 -n 10>nul ?
cls
echo ×××3.Test.com連接創(chuàng)建完成，即將為您創(chuàng)建×××3.Test.com桌面快捷方式，請稍等……
ping 127.0.0.1 -n 10>nul ?
(echo set ws=createobject("wscript.shell"^) echo ws.run "cmd /c ncpa.cpl",0 echo wscript.sleep 1000 echo ws.sendkeys "{f5}" echo wscript.sleep 1000 echo ws.sendkeys "×××3.Test.com" echo wscript.sleep 500 echo ws.sendkeys "%%{f}" echo wscript.sleep 500 echo ws.sendkeys "{s}" echo wscript.sleep 300 echo ws.sendkeys "{y}" echo wscript.sleep 300 echo ws.sendkeys "%%{f4}")>%temp%\Test_×××.vbs start /wait %temp%\Test_×××.vbs cls
echo ×××3.Test.com桌面快捷方式創(chuàng)建完成.
del Test_×××.VBS
ping 127.0.0.1 -n 10>nul ?
cls
goto:check_***
:check_***
echo 即將對配置×××進(jìn)連接行校對，請稍后……
@echo off
choice /t 5 /d y /n >nul ?
echo ×××1.Test.com 配置校對完成!
@echo off
choice /t 5 /d y /n>nul ?
echo ×××2.Test.com 配置校對完成!
@echo off
choice /t 5 /d y /n>nul ?
echo ×××3.Test.com 配置校對完成!
ping 127.0.0.1 -n 10>nul ?
goto:creat_pbk
:creat_pbk
echo 即將為您生成Test_×××.PBK桌面文件
@echo off
choice /t 5 /d y /n>nul ?
for /f "delims=" %%i in ("Set ws=WScript.CreateObject("wscript.shell")") do echo %%i >> Test_×××.vbs
for /f "delims=" %%i in? ("strdesktop=ws.SpecialFolders("desktop")") do echo %%i >> Test_×××.vbs
for /f "delims=" %%i in? ("Set path=ws.CreateShortcut(strdesktop & "\Test_×××.lnk")") do echo %%i >> Test_×××.vbs
for /f "delims=" %%i in ("path.targetpath="%USERPROFILE%\AppData\Roaming\Microsoft\Network\Connections\Pbk\rasphone.pbk"") do echo %%i >> Test_×××.vbs
for /f "delims=" %%i in? ("path.save") do echo %%i >> Test_×××.vbs
cscript Test_×××.vbs & del Test_×××.vbs
@echo off
choice /t 5 /d y /n>nul ?
goto:import_reg
:import_reg
echo 即將為您導(dǎo)入SSTP相關(guān)注冊表文件
@echo off
choice /t 5 /d y /n>nul echo Windows Registry Editor Version 5.00 >import.reg ?
echo. >> import.reg
echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\SstpSvc\Parameters] >> import.reg
echo. >> import.reg
echo "NoCertRevocationCheck"=dword:00000001>>import.reg
echo. >> import.reg
regedit /s import.reg
del import.reg
echo 注冊表導(dǎo)入完成！
choice /t 5 /d y /n>nul ?
del Test_×××.vbs
echo ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: echo?????????????????????? 感謝您的耐心等待，Windows 7_×××配置完成 echo?????????????????? 現(xiàn)在您可以使用配置好的任意一個(gè)做為連接點(diǎn)使用××× echo ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: echo 感謝您的使用！ @echo off
set /p reset=按Y鍵重新啟動(dòng)計(jì)算機(jī)應(yīng)用注冊表鍵值，按任意鍵退出稍后自行重啟:
if %reset%==y (goto :reboot) else (goto :noreboot) :reboot
shutdown /r /t 0 :noreboot
echo 感謝您的使用！
choice /t 2 /d y /n>nul exit :no
cls
echo off
echo 系統(tǒng)中已存在×××1.Test.com、×××2.Test.com和×××3.Test.com連接,按任意鍵退出 & pause

轉(zhuǎn)載于:https://blog.51cto.com/tingdongwang/685737

總結(jié)

以上是生活随笔為你收集整理的Windows 7下实现×××连接自动创建的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。