WMI自動切換閘道器

2021-09-21 18:59:51 字數 970 閱讀 2154

[背景]本人比較懶,不想因為每次要更換閘道器而動這個添那個,就寫了個指令碼來提換閘道器,適合我,估計也有適合各位的,拿過去,大家可以擴充套件下,很方便的.....哈哈......

msgbox "用來自動切換閘道器的指令碼"

defaultipgateway1=array("192.168.x.x")

defaultipgateway2=array("192.168.x.y")

public function getip

computername="."

dim objwmiservice,colitems,objitem,objaddress

set objwmiservice = getobject("winmgmts:\\" & computername & "\root\cimv2")

set colitems = objwmiservice.execquery("select * from win32_networkadapterconfiguration where ipenabled = true")

for each objitem in colitems

for each defaultipgateway in objitem.defaultipgateway

if defaultipgateway <> "" then

getip=defaultipgateway

end if

if getip = "192.168.x.x" then

objitem.setgateways(defaultipgateway2)

exit function

else

objitem.setgateways(defaultipgateway1)

exit function

end if

next

next

end function

msgbox "被修改的閘道器:"+getip

主旁路由閘道器自動切換 主備閘道器

我這邊的裝置是一台刷了梅林韌體的華碩路由 192.168.50.1 和乙個跑在群暉vmm上面的openwrt旁路由 192.168.50.99 bin sh bypass 192.168.50.99 default ip 192.168.50.1 network w tail n1 if x ret...

每日自動切換桌布

python 如下 import requests import re import os headers def getphotourl host 解析主頁獲取大圖路徑 path dowloadphoto host,fileurl 接受返回的檔案路徑 print path str r reg ad...

xp 桌布自動切換

二 桌布天天換安裝完畢,在桌面空白處單擊右鍵,再單擊快捷選單中的 屬性 開啟 顯示屬性 對話方塊,你一定發現比原先多出乙個 桌布自動換 選項卡吧!切換到該選項卡,並選中 開啟桌面桌布自動換 核取方塊,然後在 下指定儲存靚照的資料夾作為桌布自動換的目錄,同時在 頻率 下將 更換一張新的間隔時間 設定為...