Méthode Session.Put
Met à jour une ressource.
Session.Put( _
ByVal resourceUri, _
ByVal resource, _
[ ByVal flags ] _
)
-
resourceUri [in]
-
Identificateur de la ressource à mettre à jour.
Ce paramètre peut contenir l’un des éléments contenus dans la liste suivante :
URI avec ou sans sélecteurs. Lorsque vous appelez la méthode Put pour obtenir une ressource WMI, utilisez la ou les propriétés de clé de l’objet. Par exemple, dans l’exemple de code VBScript (Visual Basic Scripting Edition) suivant, la clé est spécifiée par
Win32_Service?Name=winmgmt
.strResourceUri = "http://schemas.microsoft.com/" & _ "wbem/wsman/1/wmi/root/cimv2/Win32_Service?Name=winmgmt"
Objet ResourceLocator qui peut contenir des sélecteurs, des fragments ou desoptions.
Référence du point de terminaison D’adressage WS , comme décrit dans la norme WS-Management Protocol . Pour plus d’informations sur la spécification publique du protocole WS-Management, consultez Page d’index des spécifications de gestion.
-
ressource [in]
-
Contenu de ressource mis à jour.
-
indicateurs [in, facultatif]
-
Réservé. Doit avoir la valeur 0.
XML qui contient le contenu de ressource mis à jour.
L’exemple de code VBScript suivant écrit des données dans l’objet Win32_WMISetting . Vous devez inclure toutes les propriétés non matricielles de l’objet dans le code XML du paramètre Resource . L’ordre des propriétés n’est pas significatif.
'Create a WSMan object.
Set objWsman = CreateObject( "WSMAN.Automation" )
If objWsman is Nothing Then
WScript.Echo "Failed to create WSMAN Automation object"
WScript.Quit
End If
'Create a Session object.
Set objSession = objWsman.CreateSession
If objSession is Nothing Then
WScript.Echo "Failed to create WSMAN Session object"
WScript.Quit
End If
'Change the property value by putting
'the new XML content into the resource.
Dim strResourceUri, strReturnedResourceUri, newXmlContent
strResourceUri = "http://schemas.microsoft.com/wbem/wsman/1/" _
& "wmi/root/cimv2/Win32_WMISetting"
newXmlContent = _
"<p:Win32_WMISetting xmlns:p=""http://schemas.microsoft.com/" & _
"wbem/wsman/1/wmi/root/cimv2/Win32_WMISetting"">" & _
"<p:LoggingLevel>2</p:LoggingLevel></p:Win32_WMISetting>"
On Error Resume Next
strReturnedResourceUri = objSession.Put(reourceUri, newXmlContent)
WScript.Echo "Returned resource Uri:" & Chr(10) & _
strReturnedResourceUri
If Err.Number <> 0 Then
DisplayErrorInfo
End If
On Error Goto 0
Sub DisplayErrorInfo()
WScript.Echo "An error has occurred."
WScript.Echo
WScript.Echo "Error Info"
WScript.Echo "-----------"
WScript.Echo "Number : 0x" & hex(Err.number)
WScript.Echo "Description : " & Err.Description
WScript.Echo "Source : " & Err.Source
WScript.Echo "HelpFile : " & Err.helpfile
WScript.Echo "HelpContext : " & Err.HelpContext
WScript.Echo Err.Clear
End Sub
Condition requise | Valeur |
---|---|
Client minimal pris en charge |
Windows Vista |
Serveur minimal pris en charge |
Windows Server 2008 |
En-tête |
|
IDL |
|
Bibliothèque |
|
DLL |
|