| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY bietet das umfangreichste Ökosystem von B2B als auch B2C-Lösungen für IT-Akteure auf dem Markt, eine Pressemitteilung
|
Autor
|
Thema: Dateiname plus Layout1 (1160 mal gelesen)
|
Martin_0103 Mitglied
Beiträge: 181 Registriert: 05.02.2003 3,4 GHz - Quadro 4000 - 12 GB RAM - WIN7 - IV2015
|
erstellt am: 02. Jun. 2003 15:35 <-- editieren / zitieren --> Unities abgeben:
Hallo Forum, ich (Anfänger) bin gerade an einer LSP Datei - ich möchte eine PLT-Datei in ein Verzeichnis schreiben. Die folgende Zeile funktioniert schon: (strcat "u:\\druck\\in\\" (vl-filename-base (getvar "dwgname")) "") "" "") Jedoch bekomme ich es nicht hin, dass die Datei "DWGNAME-Layout?" heisst. Wir arbeiten mit MDT6 und mehreren Layouts pro Datei. Vielen Dank für Eure Hilfe... Gruß aus Hessen Martin PS: Leider kein Hitzefrei... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Brischke Moderator CAD on demand GmbH
Beiträge: 4187 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools (d-tools.eu)
|
erstellt am: 02. Jun. 2003 15:49 <-- editieren / zitieren --> Unities abgeben: Nur für Martin_0103
Hallo Martin, versuchs mal hiermit:
Code:
(strcat "u:\\druck\\in\\" (vl-filename-base (getvar "dwgname")) "-" (vla-get-Name(vla-get-ActiveLayout (vla-get-ActiveDocument (vlax-get-acad-object)))) )
Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! 4 Neue Tool's im FreeDownload(gesamt 33)!? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Helmut F Mitglied Dipl.-Ing
Beiträge: 38 Registriert: 09.05.2003
|
erstellt am: 03. Jun. 2003 08:56 <-- editieren / zitieren --> Unities abgeben: Nur für Martin_0103
Hallo Martin, den Code von Holger kann ich auch gebrauchen und er funktioniert auch prima. Allerdings muss ich vorher noch eine Zeile einfügen : (vl-load-com) Ohne diesen Aufruf sind bei mir die vla-Funktionen nicht verfügbar. Gruß an alle Helmut Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Martin_0103 Mitglied
Beiträge: 181 Registriert: 05.02.2003 3,4 GHz - Quadro 4000 - 12 GB RAM - WIN7 - IV2015
|
erstellt am: 03. Jun. 2003 12:31 <-- editieren / zitieren --> Unities abgeben:
Hallo Holger, erstmal vielen Dank für die schnelle Antwort - aber irgendwie steckt bei mir der Wurm im Getriebe... Folgend findest Du meine LSP Datei, sie läuft durch, erstellt von dem aktiven Layout eine PS Datei unter dem "DWGNAMEN" (defun c:PS_MDT6_OUT () (setq diafile (getvar "filedia")) (setvar "filedia" 0) (command "-layer" "machen" "iso" "se" "0" "fr" "iso" "") (command "_zoom" "g") (command "_.-plot" "_yes" "" "PS Drucker A3 QUER (PDF).pc3" "A3" "_m" "Hochformat" "nein" "grenzen" "anpassen" "0,0" "ja" "PDF.ctb" "ja" "nein" "nein" "nein" "ja" (strcat "u:\\druck\\in\\" (vl-filename-base (getvar "dwgname")) "") "" "") (setvar "filedia" diafile) (command "-layer" "ta" "iso" "") (command "_zoom" "g") (ALERT "Es wurde eine PDF Datei im Verzeichnis: U:/DRUCK/OUT... erstellt...!") ) Wenn ich nun die Zeile (strcat "u:\\druck\\in\\" (vl-filename-base (getvar "dwgname")) "") "" "") durch Deine ersetze (strcat "u:\\druck\\in\\" (vl-filename-base (getvar "dwgname")) "-" (vla-get-Name(vla-get-ActiveLayout (vla-get-ActiveDocument (vlax-get-acad-object)))) ) bekomme ich eine Fehlermeldung beim Ausführen: ; Fehler: Falsch formatierte Liste in Eingabe Mit der ersten LSP wird eine Datei mit Namen: DWGNAME.PLT erstellt, was ich möchte ist, DWGNAME-Layout1.PLT usw...
Vielen Danke nochmals für Deine Antwort.... Gruß aus Hessen ein auf dem Schlauchstehender Martin Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Brischke Moderator CAD on demand GmbH
Beiträge: 4187 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools (d-tools.eu)
|
erstellt am: 03. Jun. 2003 12:43 <-- editieren / zitieren --> Unities abgeben: Nur für Martin_0103
|
Martin_0103 Mitglied
Beiträge: 181 Registriert: 05.02.2003
|
erstellt am: 03. Jun. 2003 12:53 <-- editieren / zitieren --> Unities abgeben:
Hallo Holger, ich steh tierisch auf dem Schlauch... - ich habe doch nur die eine Zeile durch deine ersetzt. Folgend das LSP welches den Fehler verursacht. (defun c:PS_MDT6_OUT () (setq diafile (getvar "filedia")) (setvar "filedia" 0) (command "-layer" "machen" "iso" "se" "0" "fr" "iso" "") (command "_zoom" "g") (command "_.-plot" "_yes" "" "PS Drucker A3 QUER (PDF).pc3" "A3" "_m" "Hochformat" "nein" "grenzen" "anpassen" "0,0" "ja" "PDF.ctb" "ja" "nein" "nein" "nein" "ja" (vl-load-com) (strcat "u:\\druck\\in\\" (vl-filename-base (getvar "dwgname")) "-" (vla-get-Name(vla-get-ActiveLayout (vla-get-ActiveDocument (vlax-get-acad-object)))) ) (setvar "filedia" diafile) (command "-layer" "ta" "iso" "") (command "_zoom" "g") (ALERT "Es wurde eine PDF Datei im Verzeichnis: U:/DRUCK/OUT... erstellt...!") ) Danke Dir für die Antworten....
Gruß Martin Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Brischke Moderator CAD on demand GmbH
Beiträge: 4187 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools (d-tools.eu)
|
erstellt am: 03. Jun. 2003 13:25 <-- editieren / zitieren --> Unities abgeben: Nur für Martin_0103
Martin, hier gehts nicht um Zeilen tauschen sondern um den (srcat- befehl. Jeder Befehl hat eine öffnende und eine schließende Klammer. Und genau von der Öffnenden bis zur schließenden Klammer deines (strcat ...) mußt du tauschen. Dann sollte es passen. Im VLisp-Editor, stelle den Cursor mal links neben die offnende Klammer und drücke dann [Shift]+[Strg]+[9] dann hast du genau den Bereich der getauscht werden muß. Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! 4 Neue Tool's im FreeDownload(gesamt 33)!? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Martin_0103 Mitglied
Beiträge: 181 Registriert: 05.02.2003
|
erstellt am: 03. Jun. 2003 14:40 <-- editieren / zitieren --> Unities abgeben:
|