家园
个人
文集
http://
www
.
5x54
.
com
在Windows Server 2003和Windows XP中启用、管理磁盘配额VBS脚本
作者：
5x54
点击：
读取中...
次
微软官方完整教程：
(%$$#^40267*&%2)我型我塑www.5x54.com
http://www.microsoft.com/china/technet/community/scriptcenter/topics/win2003/quotas.mspx
(%$$#^40267*&%2)我型我塑www.5x54.com
(%$$#^40267*&%2)我型我塑www.5x54.com
我整理的VBS脚本代码：
(%$$#^40267*&%2)我型我塑www.5x54.com
引用代码：
(%$$#^40267*&%2)我型我塑www.5x54.com
strComputer = "." '本地计算机
(%$$#^40267*&%2)我型我塑www.5x54.com
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
(%$$#^40267*&%2)我型我塑www.5x54.com
Set colDisks = objWMIService.ExecQuery _
(%$$#^40267*&%2)我型我塑www.5x54.com
("Select * from Win32_QuotaSetting Where VolumePath = 'F:\\'") '在F:盘分区上启用磁盘配额
(%$$#^40267*&%2)我型我塑www.5x54.com
(%$$#^40267*&%2)我型我塑www.5x54.com
For Each objDisk in colDisks
(%$$#^40267*&%2)我型我塑www.5x54.com
objDisk.State = 2 '启用磁盘配额
(%$$#^40267*&%2)我型我塑www.5x54.com
objDisk.DefaultLimit = 1024*1024*1024 '配额限制1G
(%$$#^40267*&%2)我型我塑www.5x54.com
objDisk.DefaultWarningLimit = 900*1024*1024 '警告限制900M
(%$$#^40267*&%2)我型我塑www.5x54.com
objDisk.ExceededNotification = True '超出配额时写入事件
(%$$#^40267*&%2)我型我塑www.5x54.com
objDisk.WarningExceededNotification = True '超出警告时写入事件
(%$$#^40267*&%2)我型我塑www.5x54.com
objDisk.Put_
(%$$#^40267*&%2)我型我塑www.5x54.com
Next
(%$$#^40267*&%2)我型我塑www.5x54.com
收藏此文章
打印
更新
编辑此文章
『关闭窗口』
