Autor
|
Thema: CATScript automatisiert in DELMIA V5 aufrufen (1481 mal gelesen)
|
Steve_Snow Mitglied Student / Diplomand
Beiträge: 6 Registriert: 11.04.2006
|
erstellt am: 17. Mai. 2006 08:13 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen ! Ich habe folgendes Problem: Ich muss aus einem VBA Projekt unter DELMIA V5 ein CATScript aufrufen. unter CATIA V5 funktioniert dies mit den Zeilen :
Code:
CATIA.SystemService.ExecuteScript "X:/catscript/work", catScriptLibraryTypeDirectory, "test.CATScript", "Testfunktion", params
Leider bekomme ich beim Ausführen dieser Zeilen unter DELMIA V5 die Meldung, daß bei ".ExecuteScript" die Schnittstelle nur eingeschränkt verwenden kann, oder ganrnicht unterstützt wird :-( Läuft also nicht. Kennt jemand eine ander Lösung, wie man unter DELMIA V5 ein CATScript automatisiert starten kann ??? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tomtom1972 Mitglied dipl ing maschinenbau
Beiträge: 605 Registriert: 22.03.2005 NVidia Quadro K4000 Intel Xeon E5-1620, 64GB RAM Windows10 64bit R30 <= CATIA V5 > =R19
|
erstellt am: 17. Mai. 2006 09:02 <-- editieren / zitieren --> Unities abgeben: Nur für Steve_Snow
Hallo, wir haben momentan ein ähnliches Problem, welches ich allerdings noch nicht eingehender betrachtet habe. Ich möchte ein als .exe kompiliertes Script (VB6.0) in Delmia laufen lassen und bekomme gleich einen Error. Das Script findet die Application schon gar nicht. Meine Vermutung war folgende: Die Application heisst nicht mehr CATIA (V5) sondern Delmia (V5), steht ganz links oben im Fenster. Habe aber wie gesagt noch nichts getestet. An deiner Stelle würde ich es also mal mit DELMIA.SystemService.ExecuteScript "....." probieren. Poste mal bitte, ob das geklappt hat. Gruss TomTom ------------------ tomtom1972 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Steve_Snow Mitglied Student / Diplomand
Beiträge: 6 Registriert: 11.04.2006
|
erstellt am: 17. Mai. 2006 09:13 <-- editieren / zitieren --> Unities abgeben:
Natürlich heißt die Anwendung nun DELMIA *g* Aber ich habe das mit DELMIA.SYSTEM ... auch schon probiert. Selbes Ergebnis. Auch dort ist die Funktion deaktiviert. Nach meiner Erfahrung sind die Syntaktischen Unterbauten der Programme DELMIA V5 und CATIA V5 identisch. Was in VBA unter CATIA geht, geht auch unter DELMIA. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bobby_Joe2001 Mitglied Konstrukteur
Beiträge: 81 Registriert: 15.01.2006
|
erstellt am: 17. Mai. 2006 19:07 <-- editieren / zitieren --> Unities abgeben: Nur für Steve_Snow
Manmals isses komsich, aber probiers mal mit einem Objektverweis: Set SysService = CATIA.SystemService
SysService.ExecuteScript "X:/catscript/work", catScriptLibraryTypeDirectory, "test.CATScript", "Testfunktion", params Gruß Bobby
------------------ Du musst die Leute einmal richtig ärgern, dann wirst du endlich ernst genommen. Konrad Adenauer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Steve_Snow Mitglied Student / Diplomand
Beiträge: 6 Registriert: 11.04.2006
|
erstellt am: 18. Mai. 2006 08:31 <-- editieren / zitieren --> Unities abgeben:
Moin ! Danke für die Antwort. Aber so richtig funktioniert das leider auch nicht. Zum einen weiß ich nicht, was für Parameter im einzelnen machen, und vor allem, was catScriptLibraryTypeDirectory ist. VBA meckert, daß es nach eine Zuweisung möchte Set SysService = CATIA.SystemService SysService.EcecuteScript <hier> Hmmm ... komische Sache. Ich werde die CATScripte wohl weiterhin von Hand ausführen müssen. :-( möchte in der Zeile
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Steve_Snow Mitglied Student / Diplomand
Beiträge: 6 Registriert: 11.04.2006
|
erstellt am: 30. Mai. 2006 13:37 <-- editieren / zitieren --> Unities abgeben:
Habs doch noch geschafft: Code:
Sub Aufruf() Dim Params() Set SServ = CATIA.SystemService LibPath = "c:\" Scriptname = "Makro1.catvbs" FunctionName = "CATMain" Call SServ.ExecuteScript(LibPath, catScriptLibraryTypeDirectory, Scriptname, FunctionName, Params) End Sub
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |