中国DOS联盟

自己寝室用的，主机装了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

没人顶我来看了回帖

对于宿舍共享上网应该有用