dalefuller
Programmer
We have a bunch of bitmaps that have been saved as blobs via Column OLE objects to the DB (Oracle). Now we need to have the ability to save the blobs back to disk as a usable file. As is, they contain minimal wrapper info and are not recognizable to the host server app (MS-Paint) when saved to disk via SelectBlob, etc.
Need to be able to do this programmatically.
Would be nice to be able to do something like...
blob lblob
oleobject lole
selectblob ... into :lblob ...
lole = connecttonewobject("Paint.Picture")
lole.objectdata = lblob
lole.<whatever>.saveas("filename","bmp")
but this fails at a couple different points.
- MS-paint doesn't like to be a ole server in this context.
- objectdata isn't a property of oleobjects.
- and who knows what the saveas function would actually look like.
But I think you'll get what I would like to do.
Any suggestions would be greatly appreciated.
Thanks.
Need to be able to do this programmatically.
Would be nice to be able to do something like...
blob lblob
oleobject lole
selectblob ... into :lblob ...
lole = connecttonewobject("Paint.Picture")
lole.objectdata = lblob
lole.<whatever>.saveas("filename","bmp")
but this fails at a couple different points.
- MS-paint doesn't like to be a ole server in this context.
- objectdata isn't a property of oleobjects.
- and who knows what the saveas function would actually look like.
But I think you'll get what I would like to do.
Any suggestions would be greatly appreciated.
Thanks.