What is the best way of saving an (bitmap) image in an OLE control to a bitmap (.bmp) file. This is the method I'm using but I get a "No object" error at the line,
"olePicture.SaveToFile (FileNumber)".


Dim FileNumber As Integer
Dim LocationAndFileName As String
FileNumber = FreeFile()
LocationAndFileName = App.Path & "\Logo.bmp"

Open LocationAndFileName For Binary As #FileNumber

olePicture.SaveToFile (FileNumber)

Close #FileNumber