Microsoft® Windows® 2000 Scripting Guide
« Previous | Next »
You can also use the DiskQuotaControl object to modify the quotas assigned to an existing user. By binding to the quota entry for a user, you can change both the maximum disk space allocated to that user (QuotaLimit) and the disk space usage that triggers a quota warning (QuotaThreshold).
Scripting Steps
Listing 10.14 contains a script that modifies the disk quota for a user. To carry out this task, the script must perform the following steps:
- Create an instance of the DiskQuota1 object.
- Use the Initialize method to indicate that the quota entry to be modified is on drive C.
The Initialize method requires the following two parameters:
- The drive letter of the drive where the quota resides (in this case, C).
- The value True, indicating that the drive should be initialized for read/write access. By setting this value to False (read-only), you can enumerate disk quota entries on the volume but you cannot make any changes.
- Use the FindUser method to query the quota entry for jsmith from the fabrikam domain.
- Set the QuotaThreshold for user jsmith from the fabrikam domain to 90,000,000 bytes, and set the QuotaLimit to 100,000,000 bytes.
Listing 10.14 Modifying a Disk Quota Entry
1 2 3 4 5
| Set colDiskQuotas = CreateObject( "Microsoft.DiskQuota.1 ") colDiskQuotas.Initialize "C:\ ", True Set objUser = colDiskQuotas.FindUser( "fabrikam\jsmith ") objUser.QuotaThreshold = 90000000 objUser.QuotaLimit = 100000000 |
Send us your feedback | « Previous | Next » |