kuehnlm 10 Posted August 16, 2004 Report Posted August 16, 2004 Hallo, ich hab folgendes Script zum Shares auslesen. On Error Resume Next Dim Args Set Args = WScript.Arguments strComputer = Args(0) Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery_ ("Select * from Win32_Share") For Each objItem in colItems Wscript.Echo ";" & objItem.Name & "," & objItem.Path Next Wo muß ich angeben, dass das von mir aus mit Parametermitgabe (cscript shares.vbs <computername>) auf allen Rechnern die jeweiligen Shares ausliest....tut nämlich irgendwie nicht... DANKE Quote
kuehnlm 10 Posted August 17, 2004 Author Report Posted August 17, 2004 hallo?? keiner eine idee?? Quote
Operator 10 Posted August 17, 2004 Report Posted August 17, 2004 Wenn Du das "On Error Resume Next" rausnimmst, bekommst Du zumindest schon mal ne Fehlermeldung. In meinem Fall lautete die sinngemäß, daß ich keinen Zugriff auf den Rechner habe. Gibt es vielleicht eine Authentifizierung beim WMI oder eine Rechteverwaltung, die man nutzen könnte? Ansonsten bleibt Dir immer noch das Script jeweils lokal per Anmeldescript auszuführen und trotzdem alle Daten zentral zu sammeln. Andre Quote
Operator 10 Posted August 17, 2004 Report Posted August 17, 2004 Hi, ich bins nochmal. Bei meinen normalen Domain-PC's klappt es ohne Probleme. Bin im Netzwerk aber auch gerade als Domain-Admin unterwegs. Wird bei Dir also ein Berechtigungsproblem sein. Andre Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.