警告：运行BAT源码是一种危险的动作，如果你不熟悉，请不要尝试！
@echo off
del/f pcrename.vbs>nul 2>nul
title IpAuto 1.0 BY allyesno [url]http://blog.csdn.net/freexploit/[/url]
cls
echo 功能：自动设置子网，网关，DNS，计算机主机名
echo.
echo 例子 : 192.168.8.123,那么本地计算机号码则为123
echo.
set/p ip=请输入本地计算机号码 :
echo.
echo 正在设置ip,可能需要 5 分钟 请稍候......
::下面的子网/网关/ip 更改为本网吧的 ip/子网/网关
netsh int ip set add name="本地连接" static 192.168.5.%ip% 255.255.0.0 192.168.5.1 0
netsh int ip set add name="本地连接" static 192.168.5.%ip% 255.255.0.0 192.168.5.1 0
echo 设置ip完毕!
echo.
echo 正在设置DNS,请稍候.....
::下面的 DNS IP 请更改为本网吧的 DNS IP
netsh int ip set dns name="本地连接" source=static 202.103.176.22
netsh int ip add dns name="本地连接" 202.103.176.28 index=2
echo 设置DNS完毕!
echo.
echo 正在设置计算机名称,请稍后......
::修改计算机名称模块
echo set obj = getobject( "winmgmts:\\.\root\cimv2" )>pcrename.vbs
echo set list = obj.execquery( "select * from win32_computersystem" )>>pcrename.vbs
echo for each x in list>>pcrename.vbs
echo x.rename( wscript.arguments.item( 0 ) )>>pcrename.vbs
echo next>>pcrename.vbs
::下面的 公司编号 请修改为本网吧的计算机名字
cscript //nologo pcrename.vbs 公司编号%ip%
echo.
echo 设置计算机名称完毕!
echo.
echo 现在重启系统，让网卡设置生效
shutdown -r -f -t 10
del/f pcrename.vbs
del %0
|
