avhimkov
4/22/2017 - 10:27 AM

setclassid.bat

Wscript.Echo runCMD("ipconfig /showclassid")

Function runCMD(strRunCmd)

 Set objShell = WScript.CreateObject("WScript.Shell")
 Set objExec = objShell.Exec(strRunCmd)
 
 strOut = ""

 Do While Not objExec.StdOut.AtEndOfStream
  strOut = strOut & objExec.StdOut.ReadLine()
 Loop

 Set objShell = Nothing
 Set objExec = Nothing

 runCMD = strOut

End Function
ipconfig /setclassid "Local Area Connection" MinData