Aller au contenu

Version du fichier chargé


Messages recommandés

Posté(e)

Bonjour,

Jusqu'à présent, quand je voulais connaitre la version d'enregistrement (2000, 2002, 2004, etc.) du fichier que je chargais, il me sufisait de faire F2 après le chargement et de lire la suite de commande, cela été indiqué "ouverture d'un fichier de format Autocad ...".

Mais maintenant que j'ai installé Xpress, plus rien. Je n'ai plus ce renseignement.

Comment connaître la version d'un fichier?

A plus et merci

www.cad-is.fr
Autocad Map 2021 - Covadis/Autopiste V18.0c
Pisser sous la douche ne suffira pas
Posté(e)

Salut!

 

pour un chantier sur lequel je travail, je vérifie si les fichiers qui me sont envoyés sont bien dans un format (2004).

 

Au départ j'ai fait un petit lisp qui renvoie le code du fichier

;-----------------------------;
; nom: version_acad           ;
; role: renvoie le code de    ;
;       version d'autocad     ;
; param: aucun                ;
; retour: chaine de caractères;
; date: 12/04/2007            ;
; BLAES Sébastien             ;
;-----------------------------;
(defun version_acad( / Chemin NomDessin file version cpt)
(setq Chemin (getvar "DWGPREFIX"))
(setq NomDessin (getvar "DWGNAME") )

(setq file (open (strcat Chemin NomDessin ) "r"))
(setq version "" cpt 0)
(cond 
	((not file) (exit (alert "erreur d'ouverture")))
	(t 
		(while (< cpt 6)
			(setq code_ascii (read-char file))
			; on test le caractère lu, si majuscule ou chiffre c'est ok
			(if (or (and (>= code_ascii 65) (< code_ascii 91)) (and (>= code_ascii 48) (< code_ascii 58)) )
				(progn
					(setq version (strcat version (chr code_ascii))) 
					(setq cpt (1+ cpt))
				) ; progn
				(setq cpt 6)
			) ; if
		) ; while
		
		;(print version)
	) ; t
) ; cond

(close file)
version
) ; version_acad

 

Le code renvoyé est correspond à celui donné sur cette page:

http://myfeedback.autodesk.com/history/autocad_release_history.htm

 

Sinon, tu peux utiliser la bibliothèque DOSLib, c'est un fichier arx qu'il faut charger (arxload nomfichier) et tu as une fonction qui te renvoie le format: Autocad 200x

 

Voilà.

 

a+.

Tous pour lisp, Lisp pour tous!

Avec Revit, cela ne vas trop vite...

Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité