vla-open veut pas opener

[couçicouça]

bonsoir

 

je tombe par hasard sur

 

(vl-load-com)

 

(defun Ouvrir_dessin_dbx(dwg / dbx)

(if (< (atoi (substr (getvar "ACADVER") 1 2)) 16)

(setq dbx (vlax-create-object "ObjectDBX.AxDbDocument"))

(setq dbx (strcat "ObjectDBX.AxDbDocument." (substr (getvar "ACADVER") 1 2))

dbx (vlax-create-object dbx)

)

)

(vla-open dbx dwg)

dbx

)

 

(setq Dbx (ouvrir_dessin_dbx "c:/test.dwg"))

(setq bl (vla-item (vla-get-blocks Dbx) "*Model_Space"))

(vla-addline bl (vlax-3d-point '(0.0 0.0 0.0)) (vlax-3d-point '(50.0 50.0 0.0)))

(vla-saveas Dbx "c:/test.dwg")

(vlax-release-object Dbx)

 

chez moi plantage

il me met quand il est sur vla-open

 

; erreur: Erreur Automation. Aucune description n'a été entrée.

 

quelqu'un peut me dire pourquoi

rien de plus rageant que de ne pas savoir quand on a besoin

[(gile)]

Salut,

 

Tu as posté dans le mauvais forum. Le code que tu montre est du Visual LISP et il aurait été plus à sa place ici.

 

Difficile de dire pourquoi tu as une erreur :

- le dessin C:/Test.dwg n'existe pas.

- le dessin C:/Test.dwg est déjà ouvert.

- ?...

[couçicouça]

désolé pour le forum

 

après plusieurs tests, plus de plantage

par contre , je cherche toujours la ligne

 

de plus, le fichier test ne semble pas s'enregistrer puisque la dernière heure de modification ne correspond pas

j'ai testé y a pas 2 minutes et il est enregistré 2 heures avant

 

je pige vraiment pô