通信人家园

 找回密码
 注册

只需一步,快速开始

短信验证,便捷登录

搜索

军衔等级:

  新兵

注册:2012-2-9
跳转到指定楼层
1#
发表于 2013-9-11 19:37:19 |只看该作者 |倒序浏览
@echo off
title Alpha - IP地址修改工具
MODE con: COLS=80 lines=20

rem IP地址列表

set lname=本地连接
rem 本地连接IP地址一 公司IP地址
set lAdd1=192.168.3.126
set lmask1=255.255.252.0
set lGat1=192.168.3.254
set ldns11=202.96.199.133
set ldns12=202.106.196.115
rem 本地连接IP地址二 家庭IP地址
set lAdd2=192.168.0.115
set lmask2=255.255.255.0
set lGat2=192.168.0.1
set ldns21=202.96.199.133
set ldns22=202.106.196.115

set wname=无线网络连接
rem 无线连接IP地址一 公司IP地址
set wAdd1=%lAdd1%
set wmask1=%lmask1%
set wGat1=%lGat1%
set wdns11=%ldns11%
set wdns12=%ldns12%
rem 无线连接IP地址二 家庭IP地址
set wAdd2=%lAdd2%
set wmask2=%lmask2%
set wGat2=%lGat2%
set wdns21=%ldns21%
set wdns22=%ldns21%


:home
cls
@echo.
@echo      Alpha - IP地址修改工具    ( KYT -- PanFu )
@echo.
@echo           1:设置 %lname%
@echo           2:设置 %wname%
@echo.
@echo 警告:WIN7系统必须 单击右键 [以管理员身份运行(A)] !
@echo.
@echo.
set shut=""
set /p shut="请输入 【<1> 或 <2> 或 <q>退出】 并按回车键 :"
IF NOT "%shut%"=="" (
if %shut% NEQ "" SET shut=%shut:~0,1%
) else (
set shut="")
if /i %shut%==1 goto locally
if /i %shut%==2 goto wireless
if /i %shut%==q exit
goto home

:locally
cls
@echo.
@echo      修改 %lname% IP地址      ( KYT -- PanFu )
@echo.
@echo           1:设置 %lname% 自动获取IP地址
@echo           2:设置 %lname% IP地址为公司IP %lAdd1%
@echo           3:设置 %lname% IP地址为专用IP %lAdd2%
@echo.
@echo.
set shut=""
set /p shut="请输入 【<1> 或 <2> 或 <3> 或 <q>退出】 并按回车键 或者 按<回车键>返回主菜单 :"
IF NOT "%shut%"=="" (
if %shut% NEQ "" SET shut=%shut:~0,1%
) else (
set shut="")
if /i %shut%==1 goto locallyone
if /i %shut%==2 goto locallytwo
if /i %shut%==3 goto locallythree
if /i %shut%==q exit
goto home

:wireless
cls
@echo.
@echo      修改 %wname% IP地址      ( KYT -- PanFu )
@echo.
@echo           1:设置 %wname% 自动获取IP地址
@echo           2:设置 %wname% IP地址为公司IP %wAdd1%
@echo           3:设置 %wname% IP地址为专用IP %wAdd2%
@echo.
@echo.
set shut=""
set /p shut="请输入 【<1> 或 <2> 或 <3> 或 <q>退出】 并按回车键 或者 按<回车键>返回主菜单 :"
IF NOT "%shut%"=="" (
if %shut% NEQ "" SET shut=%shut:~0,1%
) else (
set shut="")
if /i %shut%==1 goto wirelessone
if /i %shut%==2 goto wirelesstwo
if /i %shut%==3 goto wirelessthree
if /i %shut%==q exit
goto home

rem  设置 本地网络连接 开始
:locallyone
@echo.
@echo 正在设置 %lname% IP地址 请稍后。。。
call :autolocall %lname% >nul
@echo 设置 %lname% 自动获取IP地址成功!!
@echo.
@echo.
goto three

:locallytwo
@echo.
@echo 正在设置 %lname% IP地址 请稍后。。。
call :autowireless %wname% >nul
cmd /c netsh interface ip set address name="%lname%" static %ladd1% %lmask1% %lGat1% >nul
cmd /c netsh interface ip add dns name="%lname%" %ldns11% index=1 >nul
cmd /c netsh interface ip add dns name="%lname%" %ldns12% index=2 >nul
@echo 设置 %lname% IP地址成功!!!
@echo.
@echo 当前IP地址:   %ladd1%
@echo 当前子网掩码: %lmask1%
@echo 当前默认网关: %lGat1%
@echo 当前DNS1地址:%ldns11%
@echo 当前DNS2地址:%ldns12%
@echo.
@echo.
goto three

:locallythree
@echo.
@echo 正在设置 %lname% IP地址 请稍后。。。
call :autowireless %wname% >nul
cmd /c netsh interface ip set address name="%lname%" static %ladd2% %lmask2% %lGat2% >nul
cmd /c netsh interface ip add dns name="%lname%" addr=%ldns21% index=1 >nul
cmd /c netsh interface ip add dns name="%lname%" addr=%ldns22% index=2 >nul
@echo 设置 %lname% IP地址成功!!!
@echo.
@echo 当前IP地址:   %ladd2%
@echo 当前子网掩码: %lmask2%
@echo 当前默认网关: %lGat2%
@echo 当前DNS1地址:%ldns21%
@echo 当前DNS2地址:%ldns22%
@echo.
@echo.
goto three
:: 设置 本地网络连接 结束

::  设置 无线网络连接 开始
:wirelessone
@echo.
@echo 正在设置 %wname% IP地址 请稍后。。。
call :autowireless %wname% >nul
@echo 设置 %wname% 自动获取IP地址成功!!
@echo.
@echo.
goto three

:wirelesstwo
@echo.
@echo 正在设置 %wname% IP地址 请稍后。。。
call :autolocall %lname% >nul
cmd /c netsh interface ip set address name="%wname%" static %wadd1% %wmask1% %wGat1% >nul
cmd /c netsh interface ip add dns name="%wname%" %wdns11% index=1 >nul
cmd /c netsh interface ip add dns name="%wname%" %wdns12% index=2 >nul
@echo 设置 %wname% IP地址成功!!!
@echo.
@echo 当前IP地址:   %wadd1%
@echo 当前子网掩码: %wmask1%
@echo 当前默认网关: %wGat1%
@echo 当前DNS1地址:%wdns11%
@echo 当前DNS2地址:%wdns12%
@echo.
@echo.
goto three

:wirelessthree
@echo.
@echo 正在设置 %wname% IP地址 请稍后。。。
call :autolocall %lname% >nul
cmd /c netsh interface ip set address name="%wname%" static %wadd2% %wmask2% %wGat2% >nul
cmd /c netsh interface ip add dns name="%wname%" %wdns121% index=1 >nul
cmd /c netsh interface ip add dns name="%wname%" %wdns122% index=2 >nul
@echo 设置 %wname% IP地址成功!!!
@echo.
@echo 当前IP地址:   %wadd2%
@echo 当前子网掩码: %wmask2%
@echo 当前默认网关: %wGat2%
@echo 当前DNS1地址:%wdns21%
@echo 当前DNS2地址:%wdns22%
@echo.
@echo.
goto three
:: 设置 无线网络连接 结束

:three
::pause >nul
set shut=""
set /p shut="请输入 【<a>返回主菜单】 或者 按<其他键>退出:"
IF NOT "%shut%"=="" (
if %shut% NEQ "" SET shut=%shut:~0,1%
) else (
set shut="")
if /i %shut%==a goto home
exit

:autolocall
cmd /c netsh interface ip set address name="%lname%" static 0.0.0.0  0.0.0.0  0.0.0.0 >nul
cmd /c netsh interface ip set address name="%lname%" source=dhcp >nul
cmd /c netsh interface ip set dns name="%lname%" source=dhcp >nul
:echo 设置 %lname% 自动获取IP地址成功!
goto :eof

:autowireless
cmd /c netsh interface ip set address name="%wname%" static 0.0.0.0  0.0.0.0  0.0.0.0 >nul
cmd /c netsh interface ip set address name="%wname%" source=dhcp >nul
cmd /c netsh interface ip set dns name="%wname%" source=dhcp >nul
:echo 设置 %wname% 自动获取IP地址成功!
goto :eof

举报本楼

您需要登录后才可以回帖 登录 | 注册 |

手机版|C114 ( 沪ICP备12002291号-1 )|联系我们 |网站地图  

GMT+8, 2024-11-18 10:44 , Processed in 0.601824 second(s), 15 queries , Gzip On.

Copyright © 1999-2023 C114 All Rights Reserved

Discuz Licensed

回顶部