| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für CATIA & Co. |
| | |
 | KISTERS 3DViewStation: Germar Nikol - Der Visionär hinter der Erfolgsgeschichte, eine Pressemitteilung
|
|
Autor
|
Thema: FileSystemObject in CATVBA (2857 mal gelesen)
|
Criollo
Mitglied
   Beiträge: 42
Registriert: 07.11.2008
|
erstellt am: 06. Aug. 2010 12:41  <-- editieren / zitieren -->   Unities abgeben:          
Hallo, ich habe folgenden Code in CATVBA Dim fso as object
Dim ordner as folder Set fso = CreateObject("Scripting.FileSystemObject")
Set ordner = fso.GetFolder ("d:\tmp") Leider kommt bei Ausführen immer die Meldung - Type mismatch.
Meine Vermutung ist, dass Object die falsche Deklaration für das fso ist. Aber ich wüsste nicht welche Deklaration man sonst dafür nimmt. Vielleicht kann mir da jemand weiterhelfen. Gruss aus dem Dauerregen Crio
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bgrittmann
Moderator
Konstrukteur
    
Beiträge: 12054
Registriert: 30.11.2006 CATIA V5R19
|
erstellt am: 06. Aug. 2010 12:47 <-- editieren / zitieren --> Unities abgeben: Nur für Criollo 
|
Criollo
Mitglied
Beiträge: 42
Registriert: 07.11.2008
|
erstellt am: 06. Aug. 2010 13:08 <-- editieren / zitieren --> Unities abgeben:
Hallo Bernd, das ganze hat schon mal funktioniert, jetzt kommt leider gleich die nächste Hürde. Dafür muss ich kurz ausholen. Ich möchte aus einem CATPart die Parameter auslesen und in ein Textfile schreiben.
Das Auslesen der Parameter und Anlegen des Textfiles klappt nun schon. Nur kann ich das Textfile nicht als TextStream öffnen.
CATIA meint immer das dieses Object, diese Methode nicht unterstützt. Folgender Code: Set fso = CreateObject("Scripting.FileSystemObject")
Set ordner = fso.GetFolder ("d:\tmp")
Set myfile = ordner.CreateTextFile (dateiname & ".txt", True)
Set t = myfile.OpenAsTextStream (2,0) Die letzte Zeile bringt leider den oben beschriebenen Fehler. Wäre super wenn du dazu noch was weisst. Danke & Gruss Crio
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
HoBLila
Mitglied
Dipl.-Ing. (BA) praktische Informatik - Senior Entwickler CAx
Beiträge: 1118
Registriert: 29.05.2008 DELL PRECISION T3500
Intel(R) Xeon(R) CPU W3540 @ 2.93GHz
12285 MB RAM
NVIDIA Quadro FX 1800
Microsoft Windows 7 Enterprise Service Pack 1
CATIA V5 R19 SP09 HF69
VB6.5
CAA RADE CDC
|
erstellt am: 10. Aug. 2010 12:28 <-- editieren / zitieren --> Unities abgeben: Nur für Criollo
Versuch mal Dim myfile as Object Edit: oder Variant ------------------
Mit freundlichen Grüßen,
Henry Schneider
alias Lila Es gibt einen ewigen Wettkampf zwischen der Natur und den Ingenieuren:
Die Ingenieure versuchen, immer idioten-sicherere Systeme zu bauen,
die Natur versucht, immer bessere Idioten zu bauen Xing [Diese Nachricht wurde von HoBLila am 10. Aug. 2010 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Criollo
Mitglied
Beiträge: 42
Registriert: 07.11.2008
|
erstellt am: 10. Aug. 2010 12:55 <-- editieren / zitieren --> Unities abgeben:
Hallo, vielen Dank für die Antwort.
Ich habe es mittlerweile so gelöst, dass ich das CATIA.FileSystemObject verwende.
Damit klappt dann sowohl das Erzeugen des Files, als auch das erstellen des TextStreams. Viele Grüsse
Crio Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de
| 
