傻瓜式设置WANem配置 (点对点网络设置)

开放源码 = =~ 转载借用表明原地址 谢谢

之前我们用到怎么配置WANem,下面开放一个傻瓜式工具的源码。

把下列代码拷贝到记事本，修改记事本的后缀名.txt 成 .bat。

然后把这个bat文件拷贝到需要用你的WANem限制的2端PC上

我们称一端为Client端，一端为Server端。

双击这个bat文件就OK啦。

如果系统不包括中文语言包（原装的ENU的XP系统），那请使用下面第2个ENU版的= =～

@echo off if exist C:\temp.txt del C:\temp.txt echo 懒人工具之WANem使用设置 ，适用任一语言、任一Win系统Client和Server，自动判断网络环境，一键设置，八心八箭...... set slection1= set/p slection1=输入你的Client端的IP: echo %slection1%>C:\temp.txt for /f "delims=. tokens=3" %%a in (C:\temp.txt) do set x=%%a del C:\temp.txt set slection2= set/p slection2=输入你的Server端(XA or XD)的IP: echo %slection2%>C:\temp.txt for /f "delims=. tokens=3" %%a in (C:\temp.txt) do set y=%%a del C:\temp.txt set slection3= set/p slection3=输入你的WANem的IP: echo %slection3%>C:\temp.txt for /f "delims=. tokens=3" %%a in (C:\temp.txt) do set z=%%a del C:\temp.txt CHOICE /C ASC /M "当前系统是你的Client端选A,是你的Server端(XA or XD)选S,取消选择C" if %errorlevel% equ 3 goto end if %errorlevel% equ 2 goto server if %errorlevel% equ 1 goto client :client if %x%==%y% (goto p) else (goto warning) :p if %x%==%z% (goto normal) else (goto warningo) :warning CHOICE /C YC /M "当前Client端和Server端不在同一网段，强烈建议设置在同一网段，继续选择Y，取消选择C" if %errorlevel% equ 2 goto end if %errorlevel% equ 1 goto normalo :warningo CHOICE /C YC /M "当前WANem与Server，Client端不在同一网段，强烈建议设置在同一网段，继续选择Y，取消选择C" if %errorlevel% equ 2 goto end if %errorlevel% equ 1 goto normalo :server echo WANem之Server端设置—— route add %slection1% mask 255.255.255.255 %slection3% goto end :normal echo WANem之Client端设置—— route add %slection2% mask 255.255.255.255 %slection3% goto end :normalo set slection4= set/p slection4=输入你的Client的Defalut Gateway: echo WANem之Client端设置—— route add %slection3% mask 255.255.255.255 %slection4% goto end :end echo Good Luck! pause>nul

ENU版：

@echo off if exist temp.txt del temp.txt set slection1= set/p slection1=Input Client IP: echo %slection1%>temp.txt for /f "delims=. tokens=3" %%a in (temp.txt) do set x=%%a del temp.txt set slection2= set/p slection2=Input Server IP: echo %slection2%>temp.txt for /f "delims=. tokens=3" %%a in (temp.txt) do set y=%%a del temp.txt set slection3= set/p slection3=Input WANem IP: echo %slection3%>temp.txt for /f "delims=. tokens=3" %%a in (temp.txt) do set z=%%a del temp.txt CHOICE /C ASC /M "The current system is Client choose A,Server(XA or XD) choose S,Cancel choose C" if %errorlevel% equ 3 goto end if %errorlevel% equ 2 goto server if %errorlevel% equ 1 goto client :client if %x%==%y% (goto p) else (goto warning) :p if %x%==%z% (goto normal) else (goto warningo) :warning CHOICE /C YC /M "The current Client and Server are not in same subnet，suggest to make them in one subnet! Continue:Y，Cancel:C" if %errorlevel% equ 2 goto end if %errorlevel% equ 1 goto normalo :warningo CHOICE /C YC /M "The current WANem and Server，Client are not in same subnet，suggest to make them in one subnet! ，Continue:Y，Cancel:C" if %errorlevel% equ 2 goto end if %errorlevel% equ 1 goto normalo :server echo The Configuration of Server: route add %slection1% mask 255.255.255.255 %slection3% goto end :normal echo The Configuration of Client: route add %slection2% mask 255.255.255.255 %slection3% goto end :normalo set slection4= set/p slection4=Input the Defalut Gateway of your Client: echo The Configuration of Client: route add %slection3% mask 255.255.255.255 %slection4% goto end :end echo GoodLuck pause>nul