【语言-批处理】自动IP 固定ip 适合笔记本长期频繁的移动地方连接wifi

来源:互联网 发布:北京网络广告公司 编辑:程序博客网 时间:2024/04/28 16:59
@echo off echo 正在启用超级管理员权限...   %1 %2  ver|find "5.">nul&&goto :st  mshta vbscript:createobject("shell.application").shellexecute("%~s0","goto :st","","runas",1)(window.close)&goto :eof    :st  copy "%~0" "%windir%\system32\"  echo 启用超级管理员权限成功  rem 修改mode con cols=60 lines=40clscolor 3Fecho ****************************************************echo **          *********        *********        ******echo ****  *****   ******  ******  *******  ******  *****echo ****  ******  ******  ******* *******  ******* *****echo ****  ******  ******  ***************  *************echo ****  *****  ********   **************   ***********echo ****       ************     ************     *******echo ****  ****   **************   *************   ******echo ****  *****   ***************  **************  *****echo ****  *****   ******* *******  ****** *******  *****echo ****  ******   ******  ******  ******  ******  *****echo **      ******   *****        ********        ******echo ****************************************************clsecho.                                                     echo   **********         ********         ********      echo     **     ***      **      **       **      **     echo     **      **      **       *       **       *     echo     **      **      **               **             echo     **     **        ***              ***           echo     *******           *****             *****       echo     **    ***              ***              ***     echo     **     ***              **               **     echo     **     ***      *       **       *       **     echo     **      ***     **      **       **      **     echo   ******      ***    ********         ********       echo.   CLS                                                 echo.                                                     echo   ****     ****          *******             ********       echo    **       **         **       **          **      **  echo    **       **       **           **        **       *  echo    **       **      **             **       **          echo    **       **     **               **       ***        echo    ***********     **               **         *****    echo    **       **     **               **             ***  echo    **       **      **             **               **  echo    **       **       **           **        *       **  echo    **       **         **       **          **      **  echo   ****     ****          *******             ********       echo.                                                    echo **************************操作列表**************************echo 操作ID  描述echo 1       Home - 【WLAN】echo 2       Rss    【WLAN】echo 3       Domino 【本地连接】echo 4       查看设置状态echo 5       取消倒计时关机echo 6       退出echo **************************操作列表**************************color 1Fecho ***********************适配器名称列表***********************FOR /F "tokens=2 delims=器:" %%i IN ('ipconfig/all^|find /i "适配器"') DO (ECHO %%i)echo ***********************适配器名称列表***********************set/p netname=请输入您要修改的网络适配器名称:color 3Frem cls:iptset /p choice=参考操作列表,输入操作ID:if /i %choice%==1 goto st1if /i %choice%==2 goto st2if /i %choice%==3 goto st3if /i %choice%==4 goto st4if /i %choice%==5 goto st5if /i %choice%==6 goto endecho 输入无效请重新输入.goto ipt:st1echo  自动获取IP地址....netsh interface ip set address name = %netname% source = dhcp >  c:\tmp.txtfor /f "tokens=* delims=" %%1 in (C:\tmp.txt) do  (set STATUS=%%1 )IF /i "%STATUS%" equ "已在此接口上启用 DHCP。" goto msg1IF /i "%STATUS%" equ "" goto msg2goto endstr1:msg1pausecolor fcecho 请不要重复设置goto endstr1:msg2pausecolor f2echo 设置成功goto endstr1:msgend2color fcecho 无信息goto endstr1:endstr1echo   自动获取DNS服务器....netsh interface ip set dns name = %netname% source = dhcpEcho 自动获取IP成功…… goto iptrem >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>RSS<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<:st2 echo  手动设置IP地址....Netsh interface IP Set Addr %netname% Static 172.168.75.35 255.255.255.0 172.168.75.254 echo  手动设置DNS地址....Netsh interface IP Set dns %netname% static 172.16.9.101 primary echo  手动设置备份DNS地址....Netsh interface IP add dns %netname% 210.21.196.6 Echo 设置成功 您的IP为172.168.75.35…… goto iptREM >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>domino打印机<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<:st3 set/p ipp=请输入打印机本地连接的IP地址[100,253]: echo  手动设置IP地址....Netsh interface IP Set Addr %ipp% Static 192.168.125.%ipp% 255.255.255.0 192.168.125.254 Echo 设置成功 您的IP为192.168.125.%ipp% …… goto ipt:st4ipconfig /allgoto ipt:st5goto ipt:endREM exitPause