C#-完美实现VPN控制

C#

完美实现VPN控制

因为工作需要，需要用程序来控制VPN代理，在google搜了搜，还有不少朋友有同样的需求，但是目前在网上搜索到的解决方案，都还遗留了一些问题。只好自己手动把方案补齐了一下，谈不上原创，大牛们飘过就行。

先谈谈自己的需求吧，就是针对如图示中的VPN连接，咱们至少需要以下四个基本功能

1.新建一个VPN

2.修改指定名字VPN的主机IP地址

3.监视当前连接状态

4.删除指定名称的VPN直接上代码吧，这里面引用了【DotRas.dll】大家可以到官网/

下载usingSystem;usingSystem.Collections.Generic;usingSystem.Text;usingSystem.Diagnostics;usingDotRas;usingSystem.Text.RegularExpressions;namespaceAutoPersonalSubmit{publicclassVPNHelper{//系统路径C:\windows\system32\privatestaticstringWinDir=Environment.GetFolderPath(Environment.SpecialFolder.System)+@"\";//rasdial.exeprivatestaticstringRasDialFileName="rasdial.exe";//VPN路径C:\windows\system32\rasdial.exeprivatestaticstringVPNPROCESS=WinDir+RasDialFileName;//VPN地址publicstringIPToPing{get;set;}//VPN名称publicstringVPNName{get;set;}//VPN用户名publicstringUserName{get;set;}//VPN密码publicstringPassWord{get;set;}publicVPNHelper(){}///<summary>///带参构造函数///</summary>///<paramname="_vpnIP"></param>///<paramname="_vpnName"></param>///<paramname="_userName"></param>///<paramname="_passWord"></param>publicVPNHelper(string_vpnIP,string_vpnName,string_userName,string_passWord){this.IPToPing=_vpnIP;this.VPNName=_vpnName;this.UserName=_userName;this.PassWord=_passWord;}///<summary>///尝试连接VPN(默认VPN)///</summary>///<returns></returns>publicvoidTryConnectVPN(){this.TryConnectVPN(this.VPNName,this.UserName,this.PassWord);}///<summary>///尝试断开连接(默认VPN)///</summary>///<returns></returns>publicvoidTryDisConnectVPN(){this.TryDisConnectVPN(this.VPNName);}///<summary>///创建或更新一个默认的VPN连接///</summary>publicvoidCreateOrUpdateVPN(){this.CreateOrUpdateVPN(this.VPNName,this.IPToPing);}///<summary>///尝试删除连接(默认VPN)///</summary>///<returns></returns>publicvoidTryDeleteVPN(){this.TryDeleteVPN(this.VPNName);}///<summary>///尝试连接VPN(指定VPN名称，用户名，密码)///</summary>///<returns></returns>publicvoidTryConnectVPN(stringconnVpnName,stringconnUserName,stringconnPassWord){try{stringargs=string.Format("{0}{1}{2}",connVpnName,connUserName,connUserName);ProcessStartInfomyProcess=newProcessStartInfo(VPNPROCESS,args);myProcess.CreateNoWindow=true;myProcess.UseShellExecute=false;Process.Start(myProcess);}catch(ExceptionEx){Debug.Assert(false,Ex.ToString());}}///<summary>///尝试断开VPN(指定VPN名称)///</summary>///<returns></returns>publicvoidTryDisConnectVPN(stringdisConnVpnName){try{stringargs=string.Format(@"{0}/d",disConnVpnName);ProcessStartInfomyProcess=newProcessStartInfo(VPNPROCESS,args);myProcess.CreateNoWindow=true;myProcess.UseShellExecute=false;Process.Start(myProcess);}catch(ExceptionEx){Debug.Assert(false,Ex.ToString());}}///<summary>///创建或更新一个VPN连接(指定VPN名称，及IP)///</summary>publicvoidCreateOrUpdateVPN(stringupdateVPNname,stringupdateVPNip){RasDialerdialer=newRasDialer();RasPhoneBookallUsersPhoneBook=newRasPhoneBook();allUsersPhoneBook.Open();//如果已经该名称的VPN已经存在，则更新这个VPN服务器地址if(allUsersPhoneBook.Entries.Contains(updateVPNname)){allUsersPhoneBook.Entries[updateVPNname].PhoneNumber=updateVPNip;//不管当前VPN是否连接，服务器地址的更新总能成功，如果正在连接，则需要VPN重启后才能起作用allUsersPhoneBook.Entries[updateVPNname].Update();}//创建一个新VPNelse{RasEntryentry=RasEntry.CreateVpnEntry(updateVPNname,updateVPNip,RasVpnStrategy.PptpFirst,RasDevice.GetDeviceByName("(PPTP)",RasDeviceType.Vpn));allUsersPhoneBook.Entries.Add(entry);dialer.EntryName=updateVPNname;dialer.PhoneBookPath=RasPhoneBook.GetPhoneBookPath(RasPhoneBookType.AllUsers);}}///<summary>///删除指定名称的VPN///如果VPN正在运行，一样会在电话本里删除，但是不会断开连接，所以，最好是先断开连接，再进行删除操作///</summary>///<paramname="delVpnName"></param>publicvoidTryDeleteVPN(stringdelVpnName){RasDialerdialer=newRasDialer();RasPhoneBookallUsersPhoneBook=newRasPhoneBook();allUsersPhoneBook.Open();if(allUsersPhoneBook.Entries.Contains(delVpnName)){allUsersPhoneBook.Entries.Remove(delVpnName);}}///<summary>///获取当前正在连接中的VPN名称///</summary>publicList<string>GetCurrentConnectingVPNNames(){List<string>ConnectingVPNList=newList<string>();ProcessproIP=newProcess();proIP.StartInfo.FileName="cmd.exe";proIP.StartInfo.UseShellExecute=false;proIP.StartInfo.RedirectStandardInput=true;proIP.StartInfo.RedirectStandardOutput=true;proIP.StartInfo.RedirectStandardError=true;proIP.StartInfo.CreateNoWindow=true;//不显示cmd窗口proIP.Start();proIP.StandardInput.WriteLine(RasDialFileName);proIP.StandardInput.WriteLine("exit");//命令行运行结果stringstrResult=proIP.StandardOutput.ReadToEnd();proIP.Close();Regexregger=newRegex("(?<=已连接\r\n)(.*\n)*(?=命令已完成)",RegexOptions.Multiline);//如果匹配，则说有正在连接的VPNif(regger.Is