実行中の 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 | 文字列 | ProgID 文字列です。ProgID の例として、"Excel.Application"、"Inventor.Application" が挙げられます。特定の COM サーバの COM モデルについては関連ドキュメントを参照してください。 |
reuseID | 文字列 | 任意指定ですが、廃止されました。既定は "" です。 |
onExitProperty | 文字列 | 任意指定ですが、廃止されました。既定は "" です。 |
autoRelease? | ブーリアン演算 | 任意指定。True にすると、COM サーバ解放時にサーバの参照カウントが 1 減少します。既定は True です。 |
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)"