wmi sehr langsam

S

stormystormy

Hallo
Ich habe da ein Wmi Script welches im system32 nach bestimmten Datein sucht!
Doch leider dauert das ewig
Ok im System32 sind nicht gerade wenig datein aber irgendwie muss das doch schneller gehen

Hier das Script:

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colPingedComputers = objWMIService.ExecQuery _
("Select * from Win32_PingStatus Where Address = '10.1.38.239'")
For each objComputer in colPingedComputers
If objComputer.StatusCode = 0 Then
'***********************************************************
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set FileList = objWMIService.ExecQuery _
("ASSOCIATORS OF {Win32_Directory.Name='c:\Windows\System32'} Where " _
& "ResultClass = CIM_DataFile")
For Each objFile In FileList
If objFile.Extension = "arz" Then
WScript.Echo objFile.FileName
End If
Next
'**********************************************************
Else
Wscript.Echo "Remote computer did not respond."
End If
Next

WScript.Echo "Finish"



Hoffe jemand hat ne andere Lösung

Danke Roland
 

Neue Beiträge

Zurück