批处理获取IP生成TXT文本的bat代码

第一种方法:

@echo off 
<"%~f0" more +5 >tmp.vbs 
cscript //NoLogo /e:vbscript tmp.vbs %1>ip.txt 
echo >nul && del tmp.vbs 
goto:eof 
set oDOM = WScript.GetObject("http://www.duosc.com/ip.aspx") 
do until oDOM.readyState = "complete" 
WScript.sleep 200 
Loop 
s=oDOM.documentElement.innerText 
set re = New RegExp 
re.Pattern="(d+).(d+).(d+).(d+)" 
For Each m in re.Execute(s) 
WScript.Echo m 
Next

第二种方法:都是利用vbs代码

@echo off 
echo 正在连接，请稍等... 
>Getip.vbs echo Set oDOM=WScript.GetObject("http://www.ip138.com/ip2city.asp"):Do Until oDOM.readyState="complete":WScript.sleep 200:Loop:WScript.echo oDOM.documentElement.outerText:Set oDOM=nothing 
for /f "tokens=2,* delims=：" %%i in ('"cscript //nologo Getip.vbs"') do echo 你的IP地址是: %%i %%j>ip.txt 
del Getip.vbs

使用批处理禁用(启用)组策略的代码
利用批处理禁用(启用)组策略regsvr32/s/ugpedit.dll禁用regsvr32/sgpedit.dll启用单单使用这命令依然可以禁止使用组策略,但这样导致的后果就是-这时候运行的组

可以设定的定时关机的批处理
批处理定时关机.bat@echooffmodeconlines=25title定时关机color1fclsecho.echo.echo.echo.echo时间使用24小时制(如2:15、12:00)，可以输入多个时间点echo.echo多个时间点用空

创建dos命令窗口快捷方式的批处理
@echooffecho[InternetShortcut]cmd.urlechoURL=%windir%system32cmd.execmd.urlechoIconIndex=0cmd.urlechoIconFile=%windir%system32cmd.execmd.url