Save information

When I do something like this:

Public Sub Multiple_Save_Purge_Audit()
Dim doc As AcadDocument

For Each doc In Documents
doc .Save
Next

End Sub


the drawing is saved (I see it in the explorer) but it seems that the
variable which stores the "saved drawing value" is FALSE.
Anyone knows how to set this variable (and which is it?) to TRUE??? Because
when I try to close my drawing, Autocad asks me to save the already saved
drawing.


Thanks,


Gilles

 

The saved variable cannot be set through code. This code works for me
though.....


Public Sub Multiple_Save_Purge_Audit()
Dim doc As AcadDocument

For Each doc In Documents
If doc.Saved = False And doc.ReadOnly = False Then
doc.Save
End If
Next

End Sub

Tim Riley

 

Thanks a lot Tim,

Working perfectly

Gilles