Sauvegarde d\'un dwg sans mot de passe

[Zeks]

Bonjour,

un problème se pose à moi.

Je possède un DWG avec mot de passe (je possède le mot de passe) et je voudrais pouvoir l'enregistrer SANS mot de passe en VBA.

J'ai essayé un saveas mondwg, ,""

Mais il me met une erreur fatal qui ferme autocad... :(

Auriez vous une solution?

Merci

[muriel]

Bonjour,

 

En tapant

 

optionssecurite

 

sur la ligne de commande, tu peux supprimer le mot de passe, puis l'enregistrer, ton dessin n'est plus protégé.

[Zeks]

je connais cette solution mais elle est manuel !

je cherche a automatisé la chose.

[sechanbask]

Attention, l'argument de la fonction SaveAs attend un variant pour la protection. Voir la copie de l'aide juste en dessous :

 

object.SaveAs FileName, FileType [, SecurityParams]

 

Object

 

Document, MenuGroup

The object or objects this method applies to.

 

 

 

Note This method has no effect for menu groups.

 

FileName

 

String; input-only

The full path and file name, or valid URL address, for the file. The active document takes on the new name.

 

FileType

 

 

AcSaveAsType enum; input-only; optional for Document objects

 

ac2000_dwg

AutoCAD 2000 DWG (*.dwg)

 

ac2000_dxf

AutoCAD 2000 DXF (*.dxf)

 

ac2000_Template

AutoCAD 2000 Drawing Template File (*.dwt)

 

ac2004_dwg

AutoCAD 2004 DWG (*.dwg)

 

ac2004_dxf

AutoCAD 2004 DXF (*.dxf)

 

ac2004_Template

AutoCAD 2004 Drawing Template File (*.dwt)

 

acNative

A synonym for the latest drawing release. In this release, this value equals ac2004_dwg.

 

 

SecurityParams

 

SecurityParams object; variant; optional for Document objects

Security settings for an encrypted drawing.

 

Je sais c'est pas toujours clair mais l'aide apporte très souvent la réponse. donc ça marche en faisant :

 

Sub enre()


Dim var_protection As Variant

ThisDrawing.Application.ActiveDocument.SaveAs "C:\MyDrawing.dwg", , var_protection
   

End Sub

 

Attention, mon code n'est pas très propre car j'ai utilisé une variable variant sans l'initialiser car je ne sais pas comment on peut la "vider", pour être sûr qu'elle n'est pas allouée par erreur.

[Zeks]

Bonjour,

Merci de la réponse.

Malheureusement cette solution ne fonction toujours pas.

J'ai demandé a Autodesk et apparemment nous ne pouvons pas modifié le mot de passe en programme (une erreur de conception d'après eux).

[sechanbask]

ça marche avec autocad 2006 ! tu as quelle version ?

[Zeks]

j'utilise autocad 2008.