Session.Get 方法
擷取 URI 所指定的資源,並傳回目前資源實例的 XML 表示。
語法
Session.Get( _
ByVal resourceUri, _
[ ByVal flags ] _
)
參數
-
resourceUri [in]
-
要擷取之資源的識別碼。
此參數可以包含下列其中一項:
具有或不含 選取器的URI。 使用選取器呼叫 Get 方法以取得 WMI 資源時,請使用 物件的索引鍵屬性或屬性。 例如,在下列 Visual Basic Scripting Edition (VBScript) 程式碼範例中,索引鍵是由 指定
Win32_Service?Name=winmgmt
。 對於單一類別,例如 Win32_LocalTime,您無法使用選取器。strResourceUri = "http://schemas.microsoft.com/" _ & "wbem/wsman/1/wmi/root/cimv2/Win32_Service?Name=winmgmt" strResourceUri = "http://schemas.microsoft.com/" _ & "wbem/wsman/1/wmi/root/cimv2/Win32_LocalTime"
ResourceLocator物件,可能包含選取器、片段或選項。
WS 定址端點參考,如WS-Management通訊協定標準中所述。 如需 WS 管理通訊協定公用規格的詳細資訊,請參閱 管理規格索引頁面。
-
旗標 [in, 選擇性]
-
保留的。 必須設定為 0。
傳回值
資源的 XML 表示。
範例
下列 VBScript 程式碼範例會擷取代表本機電腦上 WMI Winmgmt 服務的 Win32_Service 實例的 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
strResourceUri = "http://schemas.microsoft.com/" _
& "wbem/wsman/1/wmi/root/cimv2/Win32_Service?Name=winmgmt"
On Error Resume Next
xmlResource = objSession.Get( strResourceUri )
WScript.Echo "Response message: " & Chr(10) & xmlResource
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
下列 VBScript 程式碼範例會從遠端電腦擷取 WMI Winmgmt 服務實例。 遠端電腦是由完整功能變數名稱 (servername.domain.com) 來識別。 本機和遠端版本之間的唯一差異是 WSMan.CreateSession呼叫中的遠端電腦規格。
Const RemoteComputer = "servername.domain.com"
'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.
Dim objSession
Set objSession = objWsman.CreateSession( "https://" & RemoteComputer )
If objSession is Nothing Then
WScript.Echo "Failed to create WSMAN Session object"
WScript.Quit
End If
strResourceUri = "http://schemas.microsoft.com/wbem/wsman/1/wmi/root/cimv2/" _
& "Win32_Service?Name=winmgmt"
On Error Resume Next
xmlResource = objSession.Get( strResourceUri )
WScript.Echo "Response message: " & Chr(10) & xmlResource
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 |
標頭 |
|
Idl |
|
程式庫 |
|
DLL |
|