Rechercher dans la communauté
Affichage des résultats pour les étiquettes 'scr'.
1 résultat trouvé
-
Bonjour, J'essaye tant bien que mal de faire une routine final ( via bouton) pour me simplifier la vie lors de mes exports via un script SCR, je bloque sur deux élèments: -je voudrais exporter en pdf, mais ça bloque sur le nom du fichier, ->pdfname est bien formé mais il ne veut pas se rentrer et arborescence : (setq dwgname (GETVAR "dwgname")) (setq lendwg (strlen dwgname)) (setq dwgname (substr dwgname 1 (- lendwg 4))) (setq pdfname (strcat (getvar "dwgprefix") "pdf\\" dwgname "_" (getvar "ctab") ".pdf")) (setvar "TILEMODE" 0) (setvar "textfill" 1) (setvar "fillmode" 1) (command "_-EXPORT" "_PDF" "T" pdfname ) ;end et dans mes logs Commande: (setq dwgname (GETVAR "dwgname")) "testscript.dwg" Commande: (setq lendwg (strlen dwgname)) 14 Commande: (setq dwgname (substr dwgname 1 (- lendwg 4))) "testscript" Commande: (setq pdfname (strcat (getvar "dwgprefix") "pdf\\" dwgname "_" (getvar "ctab") ".pdf")) "C:\\Users\\yann\\Desktop\\pdf\\testscript_001-0-A4H.pdf" Commande: (setvar "TILEMODE" 0) 0 Commande: (setvar "textfill" 1) 1 Commande: (setvar "fillmode" 1) 1 Commande: (command "_-EXPORT" "_PDF" "T" pdfname ) _-EXPORT Entrer le format de fichier [Dwf/dwfX/Pdf] <Pdf>_PDF Entrer la zone du tracé [Présentation courante/Toutes les présentations]<Toutes les présentations>: T Mise à jour des index pour le bloc *Model_Space Terminé. Entrez le nom du fichier <testscript-001-0-A4H.pdf>: C:\Users\yann\Desktop\pdf\testscript_001-0-A4H.pdf Entrez le nom du fichier <testscript-001-0-A4H.pdf>: nil - et le deuxième éléments, serait de faire quasiment pareil mais avec la commande _etransmit... ->je bloque pour éviter qu'une fenetre s'ouvre (command "_.etransmit" "_create" (strcat (getvar 'dwgprefix) (vl-filename-base (getvar 'dwgname)) ".zip")) Bonne journée et merci par avance Cordialement
