Session.Create メソッド

リソースの新しいインスタンスを作成し、新しいオブジェクトの エンドポイント参照 (EPR) を返します。

構文

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

パラメーター

resourceUri [in]

作成するリソースの識別子。

このパラメーターには、次のいずれかを含めることができます。

• 1 つ以上の セレクターを含む URI。 WMI プラグインでは、WS-Management Protocol リスナー以外のリソースの作成はサポートされていないことに注意してください。
• セレクター、フラグメント、またはオプションを含む ResourceLocator オブジェクト。
• WS-Management プロトコル標準で説明されているように、WS-Addressing エンドポイントリファレンス。 WS-Management プロトコルのパブリック仕様の詳細については、「 管理仕様のインデックス ページ」を参照してください。

resource

リソース コンテンツを含む XML。

flags [in, optional]

予約済み。 0 に設定する必要があります。

戻り値

新しいリソースの EPR。

注釈

Session.Create は、リソースの新しいインスタンスを作成するためにのみ使用されます。 Session.Put メソッドを使用して、リソースの既存のインスタンスを更新します。 新しいリソース URI を取得したら、 Session.Get を呼び出して新しいオブジェクトを取得できます。 新しいオブジェクトには、新しいオブジェクトの作成時にリソース プロバイダーによって割り当てられるプロパティが含まれます。 たとえば、新しいWS-Managementプロトコル リスナー を作成し、 Session.Get を使用してリスナー オブジェクトを取得する場合は、 Port、 Enabled、 ListeningOn の各プロパティも取得します。

WMI プラグインでは、WS-Management プロトコル リスナー以外のリソースの作成はサポートされていないことに注意してください。

このメソッドを呼び出すには、次の構文を使用します。

uri = session.Create("<resourceUri>", "<resource>")

例

次の VBScript コード例では 、Session.Create を 呼び出して、ローカル コンピューターにリスナーを作成します。

'Create a WSMan object
Set oWsman = CreateObject( "WSMAN.Automation" )

'Create a Session object
Set oSession = oWsman.CreateSession

'Define resourceUri and inputXml 
resourceUri = "http://schemas.microsoft.com/wbem/wsman/1/"_
    & "config/Listener?Address=*+Transport=HTTP"

inputXml = _
    "<cfg:Listener xmlns:cfg=""https://schemas.dmtf.org/wbem/wsman/1/"_
    & "config/Listener.xsd"">" _
    & "<cfg:Hostname>" & GetFQDNName() & "</cfg:Hostname>" _            
    & "</cfg:Listener>"

'Perform the create operation.
response = oSession.Create( resourceUri, inputXml )
WScript.Echo "Response message: " & Chr(10) & response

Function GetFQDNName()
    Dim oShell, userDNSDomain, localComputerName
    Set oShell = CreateObject("WScript.Shell")
    userDNSDomain = oShell.ExpandEnvironmentStrings("%USERDNSDOMAIN%")

    localComputerName = _
        oShell.ExpandEnvironmentStrings("%ComputerName%")
    If userDNSDomain = "%USERDNSDOMAIN%" Then
        GetFQDNName= localComputerName
    Else
        GetFQDNName= localComputerName & "." & userDNSDomain
    End If
End Function

要件

要件	値
サポートされている最小のクライアント	Windows Vista
サポートされている最小のサーバー	Windows Server 2008
Header	WSManDisp.h
IDL	WSManDisp.idl
ライブラリ	WSManDisp.tlb
[DLL]	WSMAuto.dll

こちらもご覧ください

Session

WS-Management Protocol (WS-Management プロトコル)