実行中の COM サーバに接続します。COM サーバが実行中で、取得された場合は、その IDispatch が返されます。呼び出しが正常に終了した場合は、COM サーバのオブジェクト参照カウントが 1 加算されます。
これは、VB の GetObject() 呼び出しに相当します。
COM_connectRunningServer_ ( serverName As String, _
Optional reuseID As String = "", _
Optional onExitProperty As String = "", _
Optional autoRelease? As Boolean = True ) As User
引数 | [タイプ] | 説明 |
---|---|---|
serverName | String | ProgID string します。 ProgID の例として、"Excel.Application"、"Inventor.Application" が挙げられます。特定の COM サーバの COM モデルについては関連ドキュメントを参照してください。 |
reuseID | String | 任意指定ですが、廃止されました。既定は "" です。 |
onExitProperty | String | 任意指定ですが、廃止されました。既定は "" です。 |
autoRelease? | Boolean | True [既定] True で、COM サーバ解放されている場合は、サーバの参照カウントと; オプション; します。 |
Method getInventorVersion() As String
Dim inventor As User = COM_connectRunningServer_("Inventor.Application")
Dim softwareVersion As User = COM_getProperty_( inventor, "SoftwareVersion")
Dim displayName As String = COM_getProperty_( softwareVersion, "DisplayName")
COM_releaseDispatch_( inventor)
Return displayName
End Method
--> "2009 (Build 130236001, 236)"