How to implement the script of managing network card with vbs

This article will explain in detail how to manage the network card script in vbs. The editor thinks it is very practical, so I share it for you as a reference. I hope you can get something after reading this article.

'dislan.vbs' usage: cscript / nologo dislan.vbs Const ssfCONTROLS = 3 sConnectionName = "Local connection" sEnableVerb = "enable (& A)" sDisableVerb = "disable (& B)" set shellApp = createobject ("shell.application") set oControlPanel = shellApp.Namespace (ssfCONTROLS) set oNetConnections = nothing For each folderitem in oControlPanel.items if folderitem.name = "Network and Dial-up connection" then set oNetConnections = folderitem.getfolder: exit for end if next if oNetConnections is nothing then wscript.quit end if set oLanConnection = nothing for each folderitem in oNetConnections.items if lcase (folderitem.name) = lcase (sConnectionName) then Set oLanConnection = folderitem: exit for end if next if oLanConnection is nothing then wscript.quit end if bEnabled = true set oEnableVerb = nothing set oDisableVerb = nothing s = "Verbs:" & vbcrlf for each verb in oLanConnection.verbs s = s & vbcrlf & verb.name if verb Name = sEnableVerb then set oEnableVerb = verb bEnabled = false end if if verb.name = sDisableVerb then set oDisableVerb = verb end if next if bEnabled then oDisableVerb.DoIt else oEnableVerb.DoIt end if wscript.sleep 1000 this is the end of the article on "how vbs implements the script for managing network cards" Hope that the above content can be helpful to you, so that you can learn more knowledge, if you think the article is good, please share it for more people to see.