Método Session.Get

Artículo
06/13/2023

Recupera el recurso especificado por el URI y devuelve una representación XML de la instancia actual del recurso.

Sintaxis

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

Parámetros

resourceUri [in]

Identificador del recurso que se va a recuperar.

Este parámetro puede contener uno de los siguientes elementos:

Un URI con o sin selectores. Al llamar al método Get con un selector para obtener un recurso WMI, use la propiedad de clave o las propiedades del objeto. Por ejemplo, en el siguiente ejemplo de código de Visual Basic Scripting Edition (VBScript), la clave se especifica mediante Win32_Service?Name=winmgmt. En el caso de las clases singleton, como Win32_LocalTime, no se puede usar un selector.
```
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"
```
Objeto ResourceLocator que puede contener selectores, fragmentos o opciones.
Referencia de punto de conexión de WS-Addressing como se describe en el estándar de protocolo WS-Management. Para obtener más información sobre la especificación pública para el protocolo WS-Management, vea Página de índice de especificaciones de administración.

flags [in, optional]

Reservado. Se debe establecer en 0.

Valor devuelto

Representación XML del recurso.

Ejemplos

En el siguiente ejemplo de código VBScript se recupera la representación XML de la instancia de Win32_Service que representa el servicio Winmgmt de WMI en el equipo 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

En el siguiente ejemplo de código VBScript se recupera la instancia del servicio Winmgmt de WMI desde un equipo remoto. El equipo remoto se identifica mediante el nombre de dominio completo (servername.domain.com). La única diferencia entre la versión local y remota es la especificación del equipo remoto en la llamada a 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	Value
Cliente mínimo compatible	Windows Vista
Servidor mínimo compatible	Windows Server 2008
Encabezado	WSManDisp.h
IDL	WSManDisp.idl
Biblioteca	WSManDisp.tlb
Archivo DLL	WSMAuto.dll

Consulte también

Sesión