[Résolu] importer plusieurs dgn

[ssalle]

Bonjour à tous,

 

mon responsable me demande de creer un dwg à partir de 200 dgn qui nous ont été fournis.

Il ne semble pas possible d'importer "en masse" les dgn mais seulement 1 par 1.

Je n'ai pas trouver de logiciel gratuit permettant de les convertir en dwg toujours "en masse" pour après les inserer sur 1 seul fichier.

 

Quelqu'un aurait-il une combine?

 

Merci par avance.

 

Seb.

[GEGEMATIC]

salut,

le plus simple, créer un script

outils: msdos et notepad++

sous dos:

 

dir *.dgn /b  > importdgn.scr

 

avec notepad++, editer importdgn.scr

créer une macro qui enrobe chaque ligne de nom de fichier de cette manière:

 

;;entête
DGNIMPORTMODE
1
-IMPORTDGN
;;Entrez le nom du fichier DGN à importer: 
mondessin.dgn
;;Entrez le nom de l'objet ou [?] <Default>:

;;Spécifiez les unités de conversion [Principales/Secondaires] <Principales>:

;;Spécifiez la configuration de mappage ou [?] <Standard>:

;;fin de la sequence

 

répéter la macro pour chaque ligne

exécuter le script.

 

a+

bon courage

gégé

[ssalle]

Bonjour Gégématic,

et merci pour ta réponse. La mienne est un peu tardive à cause d'un pb d'accès à cadxp suite à mise à jour sécurité :( , mais ca a l'air bon.

 

Si je comprends bien, il faudrait avec ta methode que je copier colle les 200 noms de fichiers? Je ne comprends pas grand chose aux scripts mais cela ne me semble pas plus efficace (voir moins) que de glisser chaque dgn directement dans autocad... faire qq entrer, entrer, entrer (encore une fois pour chacun).

 

qqun connaitrait-il une autre manip ou un site gratuit de conversion en masse ?

[GEGEMATIC]

Salut,

Si je comprends bien, il faudrait avec ta methode que je copier colle les 200 noms de fichiers? Je ne comprends pas grand chose aux scripts mais cela ne me semble pas plus efficace (voir moins) que de glisser chaque dgn directement dans autocad... faire qq entrer, entrer, entrer (encore une fois pour chacun).

Non, tu comprends pas bien,

je vais pas te proposer une solution aussi bourrin quand même.

Relis attentivement ce que je t'ai dis, et tu verra que ça ira très vite.

a+

gégé

[Fraid]

Bonjour,

 

Un petit lisp qui peut te rendre service.

 

(defun c:idgn (/ path listdgn olddgnimportmode olddgnimportmax)
   (setq path (dirbox "Sélectionnez le dossier" "" 512)
         listdgn (vl-directory-files path "*.dgn" 1)
         olddgnimportmode (getvar 'DGNIMPORTMODE)
         olddgnimportmax (getvar 'DGNIMPORTMAX)
   )
   (setvar 'DGNIMPORTMODE 1)
   (setvar 'DGNIMPORTMAX 0)
   (if listdgn
       (progn
           (foreach dgn listdgn 
               (command "_-importdgn" (strcat path "/" dgn) "" "" "")
           )
           (princ (strcat "\n " (itoa (length listdgn)) " dgn importés"))
       )
       (princ "\n Aucun DGN dans le dossier." )
   )
   (setvar 'DGNIMPORTMODE olddgnimportmode)
   (setvar 'DGNIMPORTMAX olddgnimportmax)
   (command "_zoom" "_e")
   (princ)
);fin idgn

;;; DirBox -Patrick_35-
(defun DirBox (Message Chemin Drapeau / reep sh)
   (setq sh (vlax-create-object "Shell.Application"))
   (if (setq
       reep (vlax-invoke sh 'browseforfolder 0 Message Drapeau Chemin)
       )
       (setq reep (vlax-get-property (vlax-get-property reep 'self) 'path))
       (setq reep nil)
   )
   (vlax-release-object sh)
   reep
);fin DirBox

[ssalle]

Bonjour,

 

@Gégématic: je suis désolé mais c'est un peu hors de mes connaissances de comprendre la programmation. Mais je te remercie sincèrement du temps passé à me répondre.

 

@Fraid: Magnifique !!! Merci bcp.

 

A+

 

Seb.

[GEGEMATIC]

Salut,

@Gégématic: je suis désolé mais c'est un peu hors de mes connaissances de comprendre la programmation.

Fraid t'a donné du poisson, je voulais t'apprendre à pécher.

les macro dans notepad++ ou editeur ne sont pas de la programmation, mais un enregistrement de séquence.

Quoi de plus simple.

C'est le BABA pour automatiser ce genre de tache.

a+

gégé

[ssalle]

Fraid t'a donné du poisson, je voulais t'apprendre à pécher.

 

Salut,

Merci de vouloir m'upgrader. La démarche est honorable.

Je t'avoue que c'est très tentant... et j'admire et remercie tous les contributeurs comme toi qui ont ces compétences et les partage.

Mais comme beaucoup, je ne prends pas le temps de m'y mettre. Avec le recule de l'age de la retraite, j'ai qqs années de plus pour le faire ;)

 

Seb.