Hallo zusammen,
ich bin gerade dabei auf einem neuen Rechner Creo7 zu testen. Nun habe ich gerade probiert, über Excel/VBA eine Verbindung mit Creo7 herzustellen und scheitere daran aber.
Mein VBA-Programm sieht wie folgt aus:
Code:
Sub Creo()
Dim asyncConnection As IpfcAsyncConnection
Dim cAC As CCpfcAsyncConnection
Dim session As IpfcBaseSession
Set cAC = New CCpfcAsyncConnection
Set asyncConnection = cAC.Start("C:\PTC\Creo7\Creo 7.0.12.0\Parametric\bin\parametric.exe", Null)
'Set asyncConnection = cAC.Connect(Null, Null, Null, 10)
Set session = asyncConnection.session
session.ChangeDirectory ("K:\CREO\USER\ak\Test")
If Not asyncConnection Is Nothing Then
If asyncConnection.IsRunning Then
asyncConnection.Disconnect (10) 'normal end
End If
End If
End Sub
Das Programm startet Creo7 wie gewünscht, aber bei "Set session = asyncConnection.session" stürzt zunächst Creo und anschließend Excel komplett ab. In Creo4 hatte das noch problemlos funktioniert. In die Doku der VB-API habe ich gesehen, dass ".session" seit Creo4 als "deprecated" markiert ist, jedoch werden keine weiterführenden Hinweise genannt. Auch wird in der Doku wird in allen Beispielen damit gearbeitet.
Folgende Lösungen habe ich ohne Erfolg recherchiert/versucht:
- vb_api_register.bat als Administrator ausgeführt
- den Verweis auf die Creo-Library im VBA-Editor neu gesetzt
Kennt jemand das Problem und hat mir vielleicht einen Lösungsansatz?
Vielen Dank im Voraus !
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP