Code Question on Mirror

[hoja]

Hi, I wrote some code so that everytime someone hits the save button, a MsgBox pops up asking if he mirrored the drawing or not. If he clicks on yes, then a MsgBox pops up saying "Ok", but if the person clicks on "no" then I want the mirror command to take effect right away...how could I do that in my code. And also right now, whether you click on yes or no, the same "yes" msgbox comes up....like is not reading the If result = VbYes Then code line. Please advice. Thank you.

Private Sub AcadDocument_BeginSave(ByVal FileName As String)

MsgBox "Did you Mirror your tops?", vbYesNo
Dim result As VbMsgBoxResult
If result = vbYes Then
MsgBox "no"
Else
MsgBox "yes"
End If
End Sub

 

[hoja]

I have another question... Is there a way to tell if the "Mirror" command has been used with some kind of script? Let's say when you hit "save" the script checks to see if you used the "Mirror" command, and if not, then it will tell you that you haven't mirrored anything on your drawing, and if you want to mirro something right now.

 

[hoja]

OK, I GOT IT !!! I made it work...if anyone would like to see the code, just write back, it was simple after all.

Rod

 

[hoja]

Well I still haven't gotten the part where it actually checks to see if a certain command has been used in the current drawing. I would still appreciate help with that if it can be done....thank you.

 

[hoja]

I finally got this script to work, if anyone is interested let me know.

 

[newbiewonkinobie]

Is this the official "Hoja Blog" site?

Flores