Database

Public Function BmpToArray(ByVal bmp As Bitmap) As Byte()
    If Not bmp Is Nothing Then
        Dim srcStream As New MemoryStream()
        Dim destStream As New MemoryStream()

        Try
            bmp.Save(srcStream, System.Drawing.Imaging.ImageFormat.Bmp)

            Dim buffer(CType(srcStream.Length - 1, Integer)) As Byte
            Dim gZip As New GZipStream(destStream, CompressionMode.Compress)

            gZip.Write(buffer, 0, buffer.Length)
            gZip.Flush()
            gZip.Close()
            gZip = Nothing

            Return destStream.ToArray()
        Finally
            srcStream.Close()
        End Try
    End If

    Return Nothing
End Function

Public Function ArrayToBmp(ByVal arr() As Byte) As Bitmap
    If (arr.Length > 0) Then
        Dim srcStream As New MemoryStream(arr)
        Dim destStream As New MemoryStream()

        Try
            Dim buffer(1024) As Byte
            Dim gZip As New GZipStream(srcStream, CompressionMode.Decompress)
            Dim readingByte As Integer = gZip.Read(buffer, 0, 1024)

            Do While readingByte > 0
                destStream.Write(buffer, 0, readingByte)
                readingByte = gZip.Read(buffer, 0, 1024)
            Loop

            gZip.Flush()
            gZip.Close()
            gZip = Nothing

            Return New Bitmap(destStream)
        Finally
            destStream.Close()
            srcStream.Close()
        End Try
    End If

    Return Nothing
End Function

INSERT INTO [Claims].[dbo].[DocumentData]<br />
           ([DocumentId]<br />
           ,[DocumentData]<br />
           ,[DocumentName]<br />
           ,[ContentType]<br />
           ,[LastUser]<br />
           ,[LastDate])<br />
     VALUES<br />
(SELECT DocumentQueueId, DocumentData, DocumentName, ContentType, AssignedTo, GetDate() FROM DocumentQueue WHERE (AssignedTo = 'nbad\SlabbertH'))

Msg 156, Level 15, State 1, Line 14<br />
Incorrect syntax near the keyword 'SELECT'.<br />
Msg 102, Level 15, State 1, Line 14<br />
Incorrect syntax near ')'.