腳本切換ip

❶ 按鍵小精靈怎樣編寫換IP刷新網頁腳本

//使用adsl獲取不同ip地址
'自定義變數NowToday，存放當前的年月日
Dim NowToday
'獲取當前年月日
NowToday = date
'獲取當前昨天的年月日
NowYesterday = dateadd("d", -1 , date)
'如果昨天建立的IP文件存在，就刪除
IsFile = Plugin.File.IsFileExit("c:\ip" & NowYesterday & ".txt")
If IsFile = True Then
Call Plugin.File.DeleteFile("c:\ip\" & NowYesterday & ".txt")
End If
'獲取當前的Ip地址
Call Plugin.Web.ClearTemp
FirstIp = Lib.網路.獲得外網IP地址()
'判斷今天的IP地址文件是否已經創建，如果已創建，判斷現在的IP地址是否與已保存的有重復，不重復追加寫入
IsFile = Plugin.File.IsFileExit("c:\ip\" & NowToday & ".txt")
'如果今天的IP地址文件已經創建
If IsFile = True Then
lines = 1
IpIsSaved = false
SavedIp = lib.文件.讀取指定行文本內容("c:\ip\" & NowToday & ".txt",lines)
'從第一行開始讀取每行IP地址，判斷是否當前IP地址是否使用過；
While SavedIp <> "溢出！" and IpIsSaved = false
'如果找到與當前IP相同的IP，則該IP已使用過，不再繼續查找
If FirstIp = SavedIp Then
IpIsSaved = true
Else
lines = lines + 1
SavedIp = lib.文件.讀取指定行文本內容("c:\ip\" & NowToday & ".txt",lines)
End If
Wend
'如果當前IP地址未使用過，則保存該IP地址
If IpIsSaved = false Then
Call Plugin.File.WriteFileEx("c:\ip\" & NowToday & ".txt", FirstIp)
End If
Else '如果今天的IP地址文件尚未創建
'創建今天的IP地址文件並保存當前的IP地址
Call Plugin.File.WriteFileEx("c:\ip\" & NowToday & ".txt", FirstIp)
End If
Call ReLink
EndScript
//重新連接網路過程
Sub ReLink
'斷開連接
Rem 斷開
call Plugin.Net.HangUp
Delay 200
Rem 撥號
OnLine = Plugin.Net.DialUp("寬頻連接")
If OnLine = False Then
Delay 1000
Goto 撥號
End If
Call Plugin.Web.ClearTemp
'獲取重新撥號後的IP地址
NowIp = Lib.網路.獲得外網IP地址()
'從當前日的IP文件中逐行讀取已保存的IP地址，並檢查重新撥號後的IP地址是否使用過
lines = 1
IpIsSaved = false
SavedIp = lib.文件.讀取指定行文本內容("c:\ip\" & NowToday & ".txt",lines)
'從第一行開始讀取每行IP地址，判斷是否當前IP地址是否使用過；
While SavedIp <> "溢出！" and IpIsSaved = false
'如果找到與當前IP相同的IP，則該IP已使用過，不再繼續查找
If NowIp = SavedIp Then
IpIsSaved = true
Else
lines = lines + 1
SavedIp = lib.文件.讀取指定行文本內容("c:\ip\" & NowToday & ".txt",lines)
End If
Wend
'如果撥號後的IP地址未使用過，則保存該IP地址
If IpIsSaved = false Then
Call Plugin.File.WriteFileEx("c:\ip\" & NowToday & ".txt", NowIp)
Else
'如果撥號後的IP地址已經使用過，重新斷開撥號
Goto 斷開
End If
End Sub

❷ 藉助腳本來修改IP地址

在Windows下可以通過編寫腳本快速修改IP地址，具體操作方法和內容如下：

1. 腳本基本框架：

   • 使用批處理文件作為腳本格式。
   • 腳本開頭通常包含@echo off來關閉命令回顯。

2. 腳本功能選項：

   • Wlan：
     • 設置為WiFi DHCP。
     • 設置WiFi靜態公網IP。
   • Ethernet：
     • 設置Ethernet為DHCP方式。
     • 設置Ethernet靜態公網IP。
   • IP地址自定義：
     • 用戶可以自定義IP地址、子網掩碼、默認網關以及DNS伺服器。
   • 清理DNS緩存：
     • 使用ipconfig /flushdns命令清理DNS緩存。
   • 開啟或關閉WIFI熱點：
     • 通過netsh wlan start hostednetwork和netsh wlan stop hostednetwork命令開啟或關閉WIFI熱點。
   • IP地址信息：
     • 顯示當前IP地址信息，使用ipconfig /all命令。
   • Exit：
     • 退出腳本。

3. 腳本執行流程：

   • 腳本首先顯示功能菜單，用戶根據需求輸入選項序號。
   • 根據用戶輸入，腳本跳轉到相應的功能塊執行。
   • 執行完成後，腳本通常會返回到主菜單或退出。

4. 注意事項：

   • 在設置靜態IP時，需要確保輸入的IP地址、子網掩碼、默認網關和DNS伺服器是有效的，且不會與網路中其他設備沖突。
   • 清理DNS緩存和開啟/關閉WIFI熱點等操作可能需要管理員許可權，因此腳本可能需要以管理員身份運行。
   • 腳本中的netsh命令是Windows內置的網路配置命令，用於修改網路適配器設置、管理WIFI網路等。

通過編寫這樣的腳本，用戶可以快速方便地切換IP地址設置，滿足不同的網路需求。