Writing Resource Properties

Microsoft® Windows® 2000 Scripting Guide

microsoft windows 2000 scripting guide

« Previous | Next »   

In Windows 2000, WMI is primarily a read-only technology; you use it mainly to retrieve information about managed resources. However, some WMI properties are read/write. This means you can use a script not only to retrieve the values of these properties but also to configure those values.

For example, the script in Listing 6.25 retrieves all instances of the Win32_OSRecoveryConfiguration class. (In this case, the class contains only a single instance.) The script provides new values for properties such as DebugInfoType and DebugFilePath and then applies the changes (and thus configures operating system recovery options) by using the Put_ method. If you do not call the Put_ method, the changes will not be applied.

Note

  • This template works only for properties that are writable. Attempting to change a read-only property will result in an error.

Listing 6.25   Template for Writing Resource Properties

1 2 3 4 5 6 7 8 9 10 11 12 13 14 
strComputer = "." strClassName = "Win32_OSRecoveryConfiguration" strNamespace = "\root\cimv2" Set objSWbemServices = GetObject("winmgmts:" _     & "{impersonationLevel=impersonate}!\\" & strComputer & strNamespace) Set colInstances = objSWbemServices.ExecQuery _     ("SELECT * FROM " & strClassName) For Each objInstance in colInstances     objInstance.DebugInfoType = 1     objInstance.DebugFilePath = "c:\scripts\memory.dmp"     objInstance.OverWriteExistingDebugFile = False     objInstance.Put_ Next

To use this template with other WMI classes and to configure other WMI properties:

  1. Set the value of strClassName to the name of the WMI class.
  2. If necessary, set the value of strNamespace to the appropriate WMI namespace.
  3. Replace the statements within the For Each loop that configure new property values. Remove the following lines, and replace them with the appropriate lines of code for the properties being modified:
    objInstance.DebugInfoType = 1 objInstance.DebugFilePath = "c:\scripts\memory.dmp" objInstance.OverWriteExistingDebugFile = False 

send us your feedback Send us your feedback « Previous | Next »   


Microsoft Windows 2000 Scripting Guide(c) Automating System Administration 2003
Microsoft Windows 2000 Scripting Guide(c) Automating System Administration 2003
ISBN: N/A
EAN: N/A
Year: 2004
Pages: 635

flylib.com © 2008-2017.
If you may any questions please contact us: flylib@qtcs.net