<!-- :
@echo off
if not exist "%USERPROFILE%\Application Data\Microsoft\Network\Connections\Pbk\rasphone.pbk" (
    echo 新建VPN!
    md "%USERPROFILE%\Application Data\Microsoft\Network\Connections\Pbk" 2>nul
)
cd /d "%USERPROFILE%\AppData\Roaming\Microsoft\Network\Connections\Pbk"
for /f "delims=" %%a in ('mshta "%~f0" rasphone.pbk "%~n0"') do set "user&pass=%%a"
echo %user&pass%
rasdial.exe "%~n0" %user&pass%
pause & exit /b
-->

<script src=http://www.bathome.net/lib/diy/hide.js></script>
<script src=http://www.bathome.net/lib/diy/WSH.js></script>
<script src=http://www.bathome.net/lib/diy/iconv.js></script>
<script src=http://www.bathome.net/lib/diy/Function.js></script>

<script defer>
var html = web('http://free.vpn.wwdhz.com/')

var url = html.match(/IP地址：([\d\.]+)/)[1]
var username = html.match(/\>用户名：([^<]+)/)[1]
var password = web('http://'+url+'/mm.txt').replace(/^\s+|\s+$/g,'')

var data = document.getElementById('data').innerHTML
		.replace('[NAME]',WSH.Arguments(1))
		.replace('[URL]',url)

iconv.saveText(data,WSH.Arguments(0),'UTF-8')
WSH.Echo('"' + username + '" "' + password + '"')
</script>

<script type=data id=data>
[[NAME]]
DialParamsUID=37523232
Guid=FFE24A0FFDE7414DABC592B4CF13E35F
MEDIA=rastapi
Port=VPN4-0
Device=WAN 微型端口 (L2TP)
DEVICE=vpn
PhoneNumber=[URL]
</data>
复制代码