加入收藏 | 设为首页 | 会员中心 | 我要投稿 应用网_镇江站长网 (https://www.0511zz.com/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 服务器 > 搭建环境 > Windows > 正文

Windows 7下实现VPN连接自动创建 - Windows家庭版

发布时间:2014-04-15 01:03:15 所属栏目:Windows 来源:站长网
导读:在完成了Windows XP下VPN自动创建并配置连接后,其实我们还需要对Windows 7下VPN自动配置做一个介绍,因为目前实际上很多企业也已经开始进行了大批量的Windows
在完成了Windows XP下VPN自动创建并配置连接后,其实我们还需要对Windows 7下VPN自动配置做一个介绍,因为目前实际上很多企业也已经开始进行了大批量的Windows 7的使用,而且很多用户目前也在逐渐向Windows 7系统迈进,那么如何让Windows 7用户也能有不错的用户体验呢?如何简化这些用户的VPN创建也成为了我们需要考虑的内容,继续前面的内容我来分享一下,我在Windows 7下的配置。

在Windows 7的VPN批处理脚本中还实现了在TMG-VPN中完成的SSTP_VPN模式时注册表的导入,当然,我们说只有您的企业中已经安装并配置好了SSTP—VPN时可能您才需要导入这个注册表键值,如果仅仅是需要完成VPN的自动创建配置,那么也可不添加这部分的批处理脚本内容。

好,接下来,我们就一起来看看如何在Windows 7下实现VPN连接自动创建吧。

@echo off & color 5a

echo :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

echo                           Windows 7_VPN连接配置

echo :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

echo               配置过程中,请勿进行任何操作,以保证配置顺利完成!

echo.                            

echo.                                     祝您工作愉快、顺利!

echo.

echo 确认安装配置VPN请按任意键继续!

pause

cls

@echo off

echo 正在检查VPN1.Test.com是否存在,请稍等……

@echo off

choice /t 5 /d y /n>nul

find "VPN1.Test.com" %USERPROFILE%AppDataRoamingMicrosoftNetworkConnectionsPbkrasphone.pbk && goto :VPN2.Test.com || goto :addVPN1.Test.com

:VPN2.Test.com

@echo off

cls

echo VPN1.Test.com已经存在或创建完成!

cls

echo 正在检查VPN2.Test.com是否存在,请稍等……

@echo off

choice /t 5 /d y /n>nul

find "VPN2.Test.com" %USERPROFILE%AppDataRoamingMicrosoftNetworkConnectionsPbkrasphone.pbk && goto :VPN3.Test.com || goto :addVPN2.Test.com

:VPN3.Test.com

@echo off

cls

echo VPN2.Test.com已经存在或创建完成!

cls

echo 正在检查VPN3.Test.com是否存在,请稍等……

@echo off

choice /t 5 /d y /n>nul

find "VPN3.Test.com" %USERPROFILE%AppDataRoamingMicrosoftNetworkConnectionsPbkrasphone.pbk && goto :no || goto :addVPN3.Test.com

pause

:addVPN1.Test.com

@echo off

echo 正在创建PEKD1.Vancl.cn连接,请稍等……

echo set WshShell = CreateObject("WScript.Shell") >Test_VPN.VBS

echo WshShell.Run "Rasphone -a" >>Test_VPN.VBS

echo WScript.Sleep 500 >>Test_VPN.VBS

echo WshShell.SendKeys "%%+W">>Test_VPN.VBS

echo WScript.Sleep 100 >>Test_VPN.VBS

echo WshShell.SendKeys "%%+I" >>Test_VPN.VBS

echo WScript.Sleep 100 >>Test_VPN.VBS

echo WshShell.SendKeys "VPN1.Test.com" >>Test_VPN.VBS

echo WScript.Sleep 100 >>Test_VPN.VBS

echo WshShell.SendKeys "%%+E" >>Test_VPN.VBS

echo WScript.Sleep 500 >>Test_VPN.VBS

echo WshShell.SendKeys "VPN1.Test.com">>Test_VPN.VBS

echo WScript.Sleep 100 >>Test_VPN.VBS

echo WshShell.SendKeys "%%+N" >>Test_VPN.VBS

echo WScript.Sleep 100 >>Test_VPN.VBS

echo WshShell.SendKeys "%%+C" >>Test_VPN.VBS

start Test_VPN.VBS

cls

echo 正在完成VPN1.Test.com_VPN连接配置,请稍等!

ping 127.0.0.1 -n 10>nul

cls

echo VPN1.Test.com连接创建完成,即将为您创建VPN1.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 "VPN1.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_VPN.vbs

start /wait %temp%Test_VPN.vbs

cls

echo VPN1.Test.com桌面快捷方式创建完成,即将为您配置VPN2.Test.com连接,请稍等……

ping 127.0.0.1 -n 10>nul

goto:VPN2.Test.com

:addVPN2.Test.com

echo 正在创建PEKD2.Vancl.cn连接,请稍等……

echo set WshShell = CreateObject("WScript.Shell") >Test_VPN.VBS

echo WshShell.Run "Rasphone -a" >>Test_VPN.VBS

echo WScript.Sleep 500 >>Test_VPN.VBS

echo WshShell.SendKeys "%%+W" >>Test_VPN.VBS

echo WScript.Sleep 100 >>Test_VPN.VBS

echo WshShell.SendKeys "%%+I" >>Test_VPN.VBS

(编辑:应用网_镇江站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!