Extracting images records and write to files

Hello, I'm really hoping someone can give me a quick code fragment. I inheritied a VB6 application using LeadTools. I need to update to .Net long term, but for now I just have an emergency request to get the image records out of the database and into file format. They were saved with the following line in the VB6 app:

img.Save sFile, FILE_JFIF, 24, 2, 0

Here is a .Net skeleton I have for extracting the records. Could someone pretty please just fill in the sample code for me so I can help out quickly? Hopefully it can be done in just a few lines?

        Dim fname As String = "test.jpg"

        Dim dr As OleDbDataReader
        dr = returnDataReader("SELECT ID, Title, Image FROM Archive")
        Do While dr.Read
            'Save dr("Image") to file as fname
           
        Loop

If anyone can help me out I'd really appreciate it, thanks much!

As far as the imaging part of your question is concerned, the way to save the image to disk file depends on how exactly it was stored in the database originally.
If the JFIF file (JPEG format) was stored complete as is, you need simply to dump the data to a disk file, and it will contain a valid JPEG image.

About doing it using OleDbDataReader, maybe the GetValue method with an ordinal value of 2 in your case might do it.

Akk! Thanks Amin. LOL, you should delete this stupid post. Someone had told me the images were in your proprietary format and I thought I needed to convert them. I just saved them as jpegs and they are fine. I should tried that first thing.

Actually we do have a few proprietary image formats, such as CMP, CMW and LEAD ABC (which is VERY powerful in compressing black and white images), but JFIF (JPEG) is not one of them.

In the latest version of the toolkit, the constant names for different JPEG formats were changed to the more commonly used JPEG instead of JFIF.