έχω μια βάση σε MS SQL Server 2008 και ένα View που μέσα σε όλα, μας επιστρέφει ένα BLOB που περιέχει δεδομένα για εικόνες (τα δεδομένα είναι από ERP).

Προσπαθώ να σώσω τα δεδομένα σε πραγματικές εικόνες με χρήση του παρακάτω κώδικα:

            Dim sql As String
            
            'SAVE BLOB AS IMAGE
            sql = "SELECT ItemGID,ItemCode,ImageBlobData" _
                & " FROM Items" _
                & " WHERE ImageBlobData is not null"

            Dim thisCommand As New SqlCommand(sql, cnSource)

            Dim thisReader As SqlDataReader = thisCommand.ExecuteReader()

            Dim MyData() As Byte
            Dim K As Long
            Dim fs As FileStream
            Dim file_name As String

            While (thisReader.Read())
                MyData = thisReader(2)
                K = UBound(MyData)
                file_name = GET_IMAGE_FOLDER & thisReader(1) & "." & GET_IMAGE_TYPE
                fs = New FileStream(file_name, FileMode.Create)
                fs.Write(MyData, 0, K)
                fs.Close()
                fs = Nothing
            End While

            thisReader.Close()

Οι εικόνες αποθηκεύονται σωστά με βάση την επέκταση που του έχω ορίσει (.jpg).

Όταν ανοίξω την εικόνα μέσα από το preview των Windows παίζει κανονικά. Όταν όμως την ανοίξω από Photoshop βγάζει error από την αρχή μόλις την επιλέξεις.

Αποτέλεσμα, όταν πάει να δει την εικόνα από site δεν την εμφανίζει παρά ένα κενό πλαίσιο.

Τι κάνω λάθος;

Ευχαριστώ