[SOLVED] [V8i VBA] How to undo changes and close without saving (no prompt)?

Question

Hi, 
 I have searched everywhere but still could not find an answer that worked for me. 
 Basically I batch export a group of DGN files into DXF. I control microstation from a powershell script using .NET. 
 These are the steps: 
 1) Run vba optimization script 
 2) Discard all changes (Key in 'UNDO ALL NOCONFIRM') 
 3)Application.ActiveDesignFile.Close 
 
 And yet, despite using the 'UNDO ALL NOCONFIRM", which should get the file back to its original state, I still get the question "Do you want to save the changes..."? Not acceptable for batch processing where all happens in the background. 
 
 What am I missing? Thanks in advance for any ideas

Jon Summers · Accepted Answer

Unknown said: 
 Discard all changes (Key in 'UNDO ALL NOCONFIRM')
Application.ActiveDesignFile.Close 
 
 The key-in is not executed immediately: rather, it is pushed on to MicroStation's input queue. A command in that queue won't be executed until the queue is empty and MicroStation is idle. 
 The method Application.ActiveDesignFile.Close is executed immediately. It 'overtakes' any command(s) in the input queue. Thus, UNDO ALL NOCONFIRM hasn't been seen at the time the DGN file is closed. 
 The simplest cure is to substitute the equivalent key-in for Application.ActiveDesignFile.Close ( CLOSE DESIGN ). That way, the sequence of events should be what you expect it to be.

Jan Šlegr · Answer

Hi Beatriz, 
 Unknown said: which should get the file back to its original state 
 It's the assumption that is not defined anywhere in MicroStation documentation. The key-in description is "negate all of the operations recorded in the Undo buffer", which as visible at the discussed situations, is not "original design file state". 
 Unknown said: which should get the file back to its original state 
 How MicroStation is configured? Are changes saved automatically (no confirmation is displayed when a design file is closed) or all changes are saved (when the confirmation dialog is accepted) during the closing process? 
 Unknown said: I still get the question "Do you want to save the changes..."? 
 Is the question exactly this one? If yes, it probably does not come from design file content changes (in such case text is different), but probably from Text Styles modifications or similar settings. I guess these changes are not part of Undo Buffer that stores primarily users' modification of graphic elements, not setting changes. 
 Unknown said: What am I missing? 
 Based on the message content it seems to me you made a wrong assumption. In my opinion you should check by what modification this message is created. If it's generated by the design file content modifications, because of the changes are saved when the file is closed, I am not sure how to remove this dialog. But if the dialog belongs to a style or other setting, maybe there is another key-in to revert done changes. E.g. for text styles, key-in sentence "textstyle selectall;textstyle reset" may work. 
 With regards, 
 Jan

[SOLVED] [V8i VBA] How to undo changes and close without saving (no prompt)?

Top Replies