ouvrir en lecture seule

[zebulon_]

Bonjour,

 

je cherche à faire un script qui ouvre des fichiers DWG en lecture seule. Quelqu'un connaîtrait-il la syntaxe de la commande _open qui active cette option ???

 

Merci.

[Maximilien]

à part changer la valeur de l'attribut (propirété du fichier) du fichier juste avant l'ouverture et le remettre en place dès l'ouverture .... je vois pas

[didier]

Salut Zebulon,

 

le script, c'est pas ma tasse de thé, pour ça, vois avec Tramber,

si tu es intéressé par un code en VBA

le voici

 

Sub OuvrirLectureSeule()

 

Dim NomFichierDwg As String

 

NomFichierDwg = "d:testpt96.dwg"

 

ThisDrawing.Application.Documents.Open NomFichierDwg, 0

 

End Sub

 

Amicalement

[Patrick_35]

Salut

en faisant

(setq a (vla-open (vla-get-documents (vlax-get-acad-object)) "MON_FICHIER.DWG" :vlax-true))

Et pour se retrouver sur le dessin MON_FICHIER

(vla-activate a)

 

Attention à la variable SDI, si elle est à 1, ça plante

 

@+