中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » ip自动切换器

175891641
初级用户

积分 82
发帖 30
注册 2007-7-3
状态离线

『楼主』: ip自动切换器

自己寝室用的，主机装了homeshare,当主机开机时，网关就自动换为主机ip,
当主机关机，网关为自动获得，主机ip放C:\WINDOWS\system32\Result.txt
通过ping baidu判断是否可以上网，s.exe
到下载http://www.xfocus.net/tools/200407/753.html名字改下即可。
@################ip切换自动器，如连接不上网络自动变为自动获得ip-非常qq编译-2007-9-15 qq175891641###########>nul 2>nul
@color 1f
@echo.
@taskkill /im homeshare.exe /f >nul 2>nul
@echo ip切换工具，适用情况；无法上网时点击此软件，非常qq编译-2007-9-15 qq175891641
@echo.
@C:\WINDOWS\system32\s.exe tcp 220.181.37.4 80 1 /save>nul 2>nul
@copy Result.txt C:\WINDOWS\system32\Result.txt >nul 2>nul
@findstr /c:"80 Open" "C:\WINDOWS\system32\Result.txt"
@if errorlevel==1 goto :retry
@if errorlevel==0 goto :ok
@:retry
@goto :next
@:ok
@del Result.txt >nul 2>nul
@del C:\WINDOWS\system32\Result.txt >nul 2>nul
@exit
@:next
@del Result.txt >nul 2>nul
@del C:\WINDOWS\system32\Result.txt >nul 2>nul
@for /F "tokens=1 delims=" %%a in ('type C:\WINDOWS\system32\zhuji.txt') do @set zhuji=%%a
@echo off
@ping -n 1 %zhuji% >C:\WINDOWS\system32\ping.txt
@findstr /i "out." "C:\WINDOWS\system32\ping.txt"
@if errorlevel==1 goto :hoston
@if errorlevel==0 goto :hostoff
@:hostoff
@echo 主机已关闭设置为单机模式正在自动获得IP...
@netsh interface IP set address name="本地连接" source=dhcp
@echo 正在为DNS设置为10.80.96.250...
@netsh interface IP set dns name="本地连接" source=static addr=10.80.96.250 register=PRIMARY
@del C:\WINDOWS\system32\ping.txt

@exit

@:hoston
@echo 主机已开启设置为共享模式
@for /F "tokens=1 delims=" %%a in ('type C:\WINDOWS\system32\myip.txt') do @set myip=%%a
@echo 设置本机Ip为%myip%
@netsh interface IP set address name="本地连接" source=static addr=%myip% mask=255.255.255.192
cls
@echo 设置网关为%zhuji%...
@netsh interface IP set address name="本地连接" gateway=%zhuji% gwmetric=0
cls
@echo 设置DNS为10.80.96.250...
@netsh interface IP set dns name="本地连接" source=static addr=10.80.96.250 register=PRIMARY
@del C:\WINDOWS\system32\ping.txt
@del C:\WINDOWS\system32\result.txt

2007-9-20 19:15