Session.Put 方法

更新資源。

語法

Session.Put( _
  ByVal resourceUri, _
  ByVal resource, _
  [ ByVal flags ] _
)

參數

resourceUri [in]

要更新之資源的識別碼。

此參數可以包含下列清單中的其中一個專案：

• 具有或不含 選取器的URI。 呼叫 Put 方法以取得 WMI 資源時，請使用 物件的索引鍵屬性或屬性。 例如，在下列 Visual Basic Scripting Edition (VBScript) 程式碼範例中，金鑰是由 Win32_Service?Name=winmgmt 指定。

  strResourceUri = "http://schemas.microsoft.com/" & _ 
    "wbem/wsman/1/wmi/root/cimv2/Win32_Service?Name=winmgmt"
  

• ResourceLocator 物件，可能包含選取器、 片段或 選項。

• WS 位址端點 參考，如 WS 管理通訊協定 標準中所述。 如需WS-Management通訊協定之公用規格的詳細資訊，請參閱 管理規格索引頁面。

資源 [in]

更新的資源內容。

旗標 [in， 選擇性]

保留的。 必須設定為 0。

傳回值

包含已更新資源內容的 XML。

範例

下列 VBScript 程式碼範例會將資料寫入 Win32_WMISetting 物件。 您必須在 Resource 參數的 XML 中包含 物件的所有非陣列屬性。 屬性的順序並不重要。

'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

規格需求

需求	值
最低支援的用戶端	Windows Vista
最低支援的伺服器	Windows Server 2008
標頭	WSManDisp.h
Idl	WSManDisp.idl
程式庫	WSManDisp.tlb
DLL	WSMAuto.dll

另請參閱

工作階段