Message 1 of 4

Not applicable
09-19-2019
11:06 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
I have been scouring the forum and API help section to see if there is a command similar to "SaveAsBitmapWithOptions" for JPEG, but haven't found anything. What I want to be able to do is shown in the code, but I need to export to JPEG for my cloud database. I can change the file type to .JPG, but I lose the ability to make the background transparent. Is there a command to do this, or a workaround to convert the exported .BMP to .JPG?
Public Sub ExportToJPG() ' Get the active view. Dim oView As View Set oView = ThisApplication.ActiveView 'Create a new NameValueMap Object Dim oOptions As NameValueMap Set oOptions = ThisApplication.TransientObjects.CreateNameValueMap '.TransientObjects.CreateNameValueMap oOptions.Value("TransparentBackground") = True Call oView.SaveAsBitmapWithOptions("C:\Temp\TestB.bmp", 200, 150, oOptions) End Sub
Solved! Go to Solution.