Using Response.Write() to display Binary data

Sat, 04 Aug 2007 14:24:14 -0700

Hi, I have been working on this for over two weeks and its not working. I don't know what else to do since I'm really green at this. I'm trying to display binary data from a database using Response.Write(). Please take a look to see where I went wrong, thank you in advance for your help.

Private Sub ListBox2_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)

Dim DBConn As OdbcConnection

Dim DBCommand As OdbcCommand

Dim DS As New DataSet
If Not LBoxProfessions.SelectedItem Is Nothing Then
DBConn = New OdbcConnection("Driver={MySQL ODBC 3.51 Driver};Server=myDB;Database=myDB;User=myUserasswo rd=myPW;Option=3;")

DBCommand = New OdbcCommand("Select ResumeID,Resumes,DocType from tb_content where Professions = '" & LBoxProfessions.SelectedItem.Text & "' Limit 10 Offset 10", DBConn)

DBConn.Open()

Dim AD As OdbcDataReader = DBCOmmand.ExecuteReader()

If (AD.Read()) Then

Dim contentLength As Integer = Convert.ToInt32(AD.GetBytes(0, 0, Nothing, 0, Integer.MaxValue))
Dim buffer As Byte() = New Byte(contentLength - 1) {}
AD.GetBytes(0, 0, buffer, 0, contentLength)

'Resumes is the field in the database table that holds the documents
Response.AddHeader("Content-Disposition", "attachment;filename=Resumes")

'DocType is the field that holds the mime types
Response.ContentType = DirectCast(AD("DocType"), String)

Response.BinaryWrite(buffer)
Response.End()
End If
DBConn.Close()
End If

End Sub

'Using Response.Write() to display Binary data' Thread RSS Feed

Using Response.Write() to display Binary data