2
Disk Qutota problem Win 2k3
Hallo
wir haben in unserem Schulnetzwerk für jeden Benutzer 250MB frei gegeben.
Gibt es eine Möglichkeit per Skript zum Beispiel dem User beim Anmelden sichtbar zu machen wie viel Speicher er noch zur Verfügung hat?
Danke für eure Hilfe!
wir haben in unserem Schulnetzwerk für jeden Benutzer 250MB frei gegeben.
Gibt es eine Möglichkeit per Skript zum Beispiel dem User beim Anmelden sichtbar zu machen wie viel Speicher er noch zur Verfügung hat?
Danke für eure Hilfe!
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 48202
Url: https://administrator.de/contentid/48202
Printed on: April 19, 2024 at 17:04 o'clock
2 Comments
Latest comment
hi boy.
google dein freund und helfer.
ms gibt hilfe *ggg*
guck mal unter: http://www.microsoft.com/technet/scriptcenter/resources/qanda/nov04/hey ...
mfg
jürgen
google dein freund und helfer.
ms gibt hilfe *ggg*
guck mal unter: http://www.microsoft.com/technet/scriptcenter/resources/qanda/nov04/hey ...
mfg
jürgen
habe es probiert aber es treten noch ein paar probleme auf.
Das ist mein Code:
strComputer = "svrname"
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colQuotas = objWMIService.ExecQuery _
("Select * From Win32_DiskQuota Where " & _
"User='Win32_Account.Domain=""standort.domäne"",Name=""user1""'")
For Each objQuota in colQuotas
intStatus = objQuota.Status
Select Case intStaus
Case 0
strStatus = "OK"
Case 1
strStatus = "Achtung. Langsam wirds knapp"
Case 2
strStatus = "Kein Speicher vorhanden!"
Case Else
strStatus = "Unknown"
End Select
Wscript.Echo "Gebrauchter Speicher: " & objQuota.DiskSpaceUsed & " / Verfügbarer Speicher: " & objQuota.Limit & " / Speicherstatus: " & strStatus
Next
Das ist das Ziel
1. User (nicht Admin) meldet sich an.
2. das script in der AD verknüft und auf dem ziel server checked den zustand der quota auf laufwerk D: - script muss dynamisch sein -> ein script für alle user und nicht ein script pro person
3. User kriegt Rückmeldung wie der Zustand ist - Bsp. Ok oder Speicher wird knapp rsp. Daten löschen
Danke für eure hilfe
Das ist mein Code:
strComputer = "svrname"
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colQuotas = objWMIService.ExecQuery _
("Select * From Win32_DiskQuota Where " & _
"User='Win32_Account.Domain=""standort.domäne"",Name=""user1""'")
For Each objQuota in colQuotas
intStatus = objQuota.Status
Select Case intStaus
Case 0
strStatus = "OK"
Case 1
strStatus = "Achtung. Langsam wirds knapp"
Case 2
strStatus = "Kein Speicher vorhanden!"
Case Else
strStatus = "Unknown"
End Select
Wscript.Echo "Gebrauchter Speicher: " & objQuota.DiskSpaceUsed & " / Verfügbarer Speicher: " & objQuota.Limit & " / Speicherstatus: " & strStatus
Next
Das ist das Ziel
1. User (nicht Admin) meldet sich an.
2. das script in der AD verknüft und auf dem ziel server checked den zustand der quota auf laufwerk D: - script muss dynamisch sein -> ein script für alle user und nicht ein script pro person
3. User kriegt Rückmeldung wie der Zustand ist - Bsp. Ok oder Speicher wird knapp rsp. Daten löschen
Danke für eure hilfe
