Topic: Save with existing Drawing Version with ObjectDBX

[SteveK]

hey,

I have another question with ObjectDBX; In our office we have 2 versions of autocad. I'm wanting to use vla-saveas with FileType based on the current drawing version. http://www.theswamp.org/index.php?topic=6774.msg348406#msg348406 has one way but I'm thinking it probably doesn't work for ObjectDBX because the drawing is already open and we're opening and closing it in there.
The error I get is
error: Exception occurred: 0xC0000005 (Access Violation)
; warning: unwind skipped on unknown exception

So is there a way of getting the drawing version in ObjectDBX or simply using vla-saveas to save whatever version the drawing originally was?

Thanks

[CAB]

Play with this:

Code: [Select]

    (setq dbxApp
        (if (< (atoi (setq oVer (substr (getvar "acadver") 1 2))) 16)
            (vla-GetInterfaceObject (vlax-get-acad-object) "ObjectDBX.AxDbDocument")
            (vla-GetInterfaceObject (vlax-get-acad-object) (strcat "ObjectDBX.AxDbDocument." oVer))
        )
    )

[SteveK]

Play with this:

Code: [Select]

    (setq dbxApp
        (if (< (atoi (setq oVer (substr (getvar "acadver") 1 2))) 16)
            (vla-GetInterfaceObject (vlax-get-acad-object) "ObjectDBX.AxDbDocument")
            (vla-GetInterfaceObject (vlax-get-acad-object) (strcat "ObjectDBX.AxDbDocument." oVer))
        )
    )

Alan, you might have to lead me a bit further, I've tried an object dump on the return and can't find anything about the version of the drawing.