enregistrer sous

[Invité ingoenius]

Salut je suis en train de crer une routine pour nommer et sauvegarder un fichier, au depart j'ouvre un gabarit .dwt et j'arrive avec un nom et un parcours complet a donner au fichier du tipe

 

la variable NomFile est une string "L:\\!PLAN\\U\\U-Congress_EXT_031108_VER 1.dwg"

 

maintenat je devrai sauvegarder se gabarit ouvert avec son nouveau nom er format ex pour format acad200

je assyé les 2 lignes si dessous sans reussir

 

(COMMAND "_saveas" NomFile 2000 "")

(vla-SaveAs (vla-get-ActiveDocument(vlax-get-acad-object)) NomFile ac2000_dwg)

 

merci de me dire ou je me trompe ;-)

 

[phil_vsd]

Salut,

 

Il te manques pas un petit guillement à la fin de ta première ligne ?

[Invité ingoenius]

je essayé en rajoutant des guimets etc , mais rien ne marche, j'arrive pas a recuperer le chemin +le nom de fichiers qui sont a l'interieur d'une variable string pour sauvegarder le dessin en cours

 

 

[phil_vsd]

heu...

 

Peut-être je me gourre mais pour le nom du fichier on peut avoir :

 

(setq S1 (getvar "DWGPREFIX"))

(Setq S2 (getvar "DWGNAME"))

 

Puis tu fais un mix des deux... non ?

 

 

[Invité ingoenius]

le probleme vien juste de la,

car j'ouvre un fichier gabarit qui est en .dwt dans un repertoire et je veut lui changer de nom d'extension et de repertoire, mais comme la variables dwgprefix est en lecture seule j'arrive pas a lui attribuer un nouveau emplacement

 

 

ex j'ouvre

C:\CAD\template1.dwt et je veut la sauvegarder comme

L:\DESS\T\Test_120108.dwg

 

ou le nom complet e son prefix viennes d'une variables qui a été creer par le lisp

 

 

 

[Patrick_35]

Salut

 

(COMMAND "_saveas" "2000" NomFile 2000 "")

 

@+

[lecrabe]

 

Hello

 

Je me permet une petite modification / suggestion ...

 

=== Sauvegarde au format DWG 2000 dans "Mes Documents" ===

 

( COMMAND "_saveas" "2000" "NomFile_2000" )

 

=== Sauvegarde au format DWG 2000 dans "C\TEMP" ===

 

( COMMAND "_saveas" "2000" "C:\\TEMP\\NomFile_2000" )

 

Le Decapode

 

[Invité ingoenius]

Desolé mais ca ne fonctionne toujours pas j'arrive pas a comprendre pourquoi

 

le prefix actuels est

 

"C:\\Documents and Settings\\m.ingenuo\\Mes documents\\"

la variable

NomeFile est

(setq NomeFile (strcat Prefisso Nome "_" Luogo "_" Data "_" Versione ".dwg"))

 

Commande: !nomefile

"L:\\!PLAN\\T\\Test1_EXT_03 Nov 2008_VER 1.dwg"

donc le nouveau nom contine le prefix et le nom que je veux ,

 

la commande

( COMMAND "_saveas" "2000" NomeFile )

ne donne aucun resultat car AutoCAD veux sauvegarder dans le path actuel et pas dans le nouveaux emplacement

 

 

[BTO]

bonjour,

 

Le chemin du fichier existe-t-il ?

S'il n'existe pas alors il faut le créer avant de tenter la sauvegarde, sinon autocad proposera d'enregistrer dans son dossier de travail par.

On peut vérifier son existence de plusieurs manières, en voici 2 :

 

(findfile (vl-filename-directory NomeFile))

(vl-file-directory-p (strcat (vl-filename-directory NomeFile) "\\"))

 

Bruno Toniutti

 

[Invité ingoenius]

le chemin existe bel e bien ! mais impossible d'ecrire dans la variable dwgprefix pour sauvegarder le dessin dans ce nouveau chemin

 

[Edité le 14/10/2008 par ingoenius]