Hallo alle zusammen,
ich will das dieses Script durchgehend auf einem Rechner läuft und den Status der Netzwerkkarte überwacht. Wenn der Status 2 ist soll das Script wiederholt werden und wenn der Status 7 ist, dann soll das Script ein Programm schließen.
So wie ich das Scipt erstellt habe funktioniert es auch, doch ist durch den erneuten aufruf des Scriptes die CPU last recht hoch! Ich würde gerne eine Lösung finden wo die CPU last niedrig bleibt! Mit einer DO Loop schleife habe ich es schon probiert, doch bin ich kein Programmierer und ich habe es einfach nicht geschaft die DO Loop schleife in dieses Script einzubauen. Vielleicht kann mir einer von euch helfen!?
Hier mein Script:
ich will das dieses Script durchgehend auf einem Rechner läuft und den Status der Netzwerkkarte überwacht. Wenn der Status 2 ist soll das Script wiederholt werden und wenn der Status 7 ist, dann soll das Script ein Programm schließen.
So wie ich das Scipt erstellt habe funktioniert es auch, doch ist durch den erneuten aufruf des Scriptes die CPU last recht hoch! Ich würde gerne eine Lösung finden wo die CPU last niedrig bleibt! Mit einer DO Loop schleife habe ich es schon probiert, doch bin ich kein Programmierer und ich habe es einfach nicht geschaft die DO Loop schleife in dieses Script einzubauen. Vielleicht kann mir einer von euch helfen!?
Hier mein Script:
Visual Basic-Quellcode
- On Error Resume Next
- strComputer = "."
- Set WSHShell = WScript.CreateObject ("WScript.Shell")
- Set objWMIService = GetObject("winmgmts:" _
- & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
- Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkAdapter Where NetConnectionID = ""LAN-Verbindung"" ")
- For Each objItem in colItems
- If objItem.NetConnectionStatus = 7 THEN WSHShell.Run "cmd /c pskill calc.exe"
- If objItem.NetConnectionStatus = 2 THEN WSHShell.Run "Script.vbs"
- Next