saveman.vba problem.

hudster · 发表于 2004-8-4 06:34:55

I downloaded this from the afralisp website but when I try to run it I get an error message stating
compile error:
case without select case.
can anyone fix this as this is a much better solution than the Autocad autosave function.

copy

' 15 Then
'save the drawing
ThisDrawing.Save
'and then reset Useri2
ThisDrawing.SetVariable ("Useri2"), NewTime
End If
' end of the Select
End Select
End
End Sub
'End Coding Here-->

Cheers
Andy

hudster · 发表于 2004-8-4 12:17:55

brilliant, cheers mate

t-bear · 发表于 2004-8-4 13:12:26

OK... this is something I've just been asking about in CAD General....so you guys gotta help this old fool out.
Got this from Afralisp:

What's a "module" and where do I find it?
Once I insert the origional and Jeffs fix, I need to save it to my acad path and load it similar to a lisp routine....right? If I want to change the prompts that activate it, I edit this part: ...So far so good. To change the time difference.....edit: ....Now does this part ... save to the current dir as a "*.save" file??? Lost again.... Enough for now. Thanks fellas.

Jeff_M · 发表于 2004-8-4 15:49:01

What's a "module" and where do I find it?A Module is a portion of the dvb file....In ACAD type VBAMAN, select the New button, then select the Visual Basic Editor button to put you in the editor. Now make sure that the new dvb you just created is highlighted in the left pane, go to the "Insert" menu, select "Module" and you will now have a new Module1 in your dvb. Right click the new module and select "View Code". Now you can place the cursor in the module's code window and paste the code.
Once I insert the origional and Jeffs fix, I need to save it to my acad path and load it similar to a lisp routine....right? Yes & No.....As was suggested, place in the startup suite to load with eash acad session. If I want to change the prompts that activate it, I edit this part: ...So far so good. To change the time difference.....edit: Correct!....Now does this part ... save to the current dir as a "*.save" file??? No, this just saves the drawing as if you typed "qsave" at the command line.Lost again.... Enough for now. Thanks fellas.To save as a different name you'd use the "SaveAs" method which is a little more detailed....path, name, & version must be supplied.
Hope that clears it up a bit,
Jeff

t-bear · 发表于 2004-8-4 16:11:35

Thjanks Jeff. That's a big help. Soon as I get a chance, I'll try this out and let you know how bad I screwed up..... The "thisDrawing.Save" thing threw me. I want it to save as a standard .bak....not a save-as. As for loading the routine, I always place my "good'ns" in the startup suite.....

hudster · 发表于 2004-8-5 03:48:28

So whats the solution to the saveas dilema, as this would be a better solution.
I'd rather the drawing savedas to a temp directory rather than overwrite the master drawing, as sometimes I'm only copying from the drawing, or doing some hypothetical editing and don't really want to alter it.

Spageddie · 发表于 2004-8-19 23:30:29

Remember...this would be the same as if you selected SAVEAS from the FILE menu......Are you sure you want to do this ??

hendie · 发表于 2004-8-20 03:39:38

ehmn.. exactly what is the saveas dielmna ?
Autocad in reality does save the drawing to a "temp" directory ~ when you "open" a drawing, Autocad actually creates a copy of the original, then places a lock on the original drawing file so it can't be "edited". When you carry out a save, it deletes the original, replaces it with a copy of the drawing you are actually working on and goes through the process again.
When I think on it, it may not replace the original until you physically close the drawing, but I'm not sure on that point. ~ Anyone use the Revert command ? does it open the drawing as the original or does it only open the drawing back to the last save command ? aha, I just checked ~ it only opens the drawing back to the last save command.
So, everytime you issue a save command, it replaces the original and creates another "copy" for you to work on. simple, no ?
what was the question again ?

hudster · 发表于 2004-8-20 03:52:28

The save as dilema is

saveman.vba problem.

发表回复

精选推荐

浏览过的版块