Stellt eine Verbindung zum aktiven COM-Server her. Kommt die Verbindung zum aktiven COM-Server zustande, wird dessen IDispatch zurückgegeben. Bei einer erfolgreichen Ausführung des Aufrufs wird der Objektreferenzzähler des COM-Servers erhöht.
Dieser Aufruf entspricht dem VB-Aufruf GetObject().
COM_connectRunningServer_ ( serverName As String, _
Optional reuseID As String = "", _
Optional onExitProperty As String = "", _
Optional autoRelease? As Boolean = True ) As User
Argument | Typ | Beschreibung |
---|---|---|
serverName | String | ProgId string . ProgIDs sind zum Beispiel "Excel.Application" oder "Inventor.Application". Lesen Sie hierzu auch die entsprechende Dokumentation zum COM-Modell Ihres COM-Servers. |
reuseID | String | Optional, jedoch veraltet. Vorgabe ist "". |
onExitProperty | String | Optional, jedoch veraltet. Vorgabe ist "". |
autoRelease? | Boolean | Optional; wenn True Referenzzähler des COM-Servers bei der freigegeben ist. Vorgabe ist 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)"