復制刪除紅色全部字體 才可使用

@echo off

%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit

cd /d "%~dp0"

//上方為.bat文件自動獲取 管理員權限 不嫌麻煩可以右擊以管理員運行 也可

for /f "tokens=16" %%i in ('ipconfig ^|find /i "ipv4"') do (

set myip=%%i

goto out

)

:out

//上方為 獲取本機現(xiàn)在IP并將他復制給myip

@echo off

set AddressName="zxc" 網(wǎng)絡鏈接名字

set IP=255.255.255.0 你對應的IP?

set gateway=255.255.255.0 默認網(wǎng)關

set MASK=255.255.255.0 子網(wǎng)掩碼

set DNS1=255.255.255.0 DNS

set DNS2=255.255.255.0? 有DNS2 就加入 沒有就刪除這行

//輸入?IP?默認網(wǎng)關?子網(wǎng)掩碼?DNS?網(wǎng)絡鏈接名字

if "%myip%"=="%IP%" (

// 判斷你的固定IP與本地ip是否相同

netsh interface ip set address name="zxc" source=dhcp

netsh interface ip set dns name="zxc" source=dhcp

// 將你ip設置成 自動獲取

) else (

netsh interface ip set address "%AddressName%" static %IP% %MASK% %gateway%

netsh interface ip set dns "%AddressName%" static %DNS1% primary

netsh interface ip add dns "%AddressName%" %DNS2%

// 將你的IP設置成 你輸入的ip地址

)

timeout 0

// 等待時間并退出 可以設置成 任何數(shù)字?