Método Session.Get

Artigo
06/13/2023

Recupera o recurso especificado pelo URI e retorna uma representação XML da instância atual do recurso.

Sintaxe

Session.Get( _
  ByVal resourceUri, _
  [ ByVal flags ] _
)

Parâmetros

resourceUri [in]

O identificador do recurso a ser recuperado.

Esse parâmetro pode conter um dos seguintes:

Um URI com ou sem seletores. Ao chamar o método Get com um seletor para obter um recurso WMI, use a propriedade de chave ou as propriedades do objeto. Por exemplo, no seguinte exemplo de código VBScript (Visual Basic Scripting Edition), a chave é especificada por Win32_Service?Name=winmgmt. Para classes singleton, como Win32_LocalTime, você não pode usar um seletor.
```
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"
```
Um objeto ResourceLocator que pode conter seletores, fragmentos ou opções.
Uma referência de ponto de extremidade WS-Addressing , conforme descrito no padrão de protocolo WS-Management. Para obter mais informações sobre a especificação pública do Protocolo WS-Management, consulte Página índice de especificações de gerenciamento.

sinalizadores [in, opcional]

Reservado. Deve ser definido como 0.

Valor retornado

Uma representação XML do recurso.

Exemplos

O exemplo de código VBScript a seguir recupera a representação XML da instância de Win32_Service que representa o serviço Winmgmt do WMI no computador local.


'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

O exemplo de código VBScript a seguir recupera a instância do serviço WMI Winmgmt de um computador remoto. O computador remoto é identificado pelo nome de domínio totalmente qualificado (servername.domain.com). A única diferença entre a versão local e remota é a especificação do computador remoto na chamada para 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

Requisitos

Requisito	Valor
Cliente mínimo com suporte	Windows Vista
Servidor mínimo com suporte	Windows Server 2008
Cabeçalho	WSManDisp.h
IDL	WSManDisp.idl
Biblioteca	WSManDisp.tlb
DLL	WSMAuto.dll

Confira também

Session

Compartilhar via