extraer objeto ole(pdf)

[cazadorpuebla]

hola, buenas mi problema es el siguiente:
tengo una base de datos en access 2010 con una tabla que tiene un campo tipo ole donde guardo archivos pdf. Queria saber como tengo que hacer para visualizar ese fichero desde aspx.
Seguro que me direis q es mejor q guarde en la base de datos la ruta al fichero en vez del fichero en si, pero eso ya lo hice y me funciona pero ahora necesito extraer el fichero del campo ole. Gracias de antemano

[cazadorpuebla]

ya consigo acceder al fichero pero cuando lo voy a visualizar me aparece una página con el formato pdf y en el número de páginas me lo muestra bien, es decir, me muestra el número de paginas que tiene el pdf pero las muestra sin contenido (en blanco). Alguien sabe por qué? Aquí les dejo mi código a ver si saben q estoy haciendo mal:


<%
Dim oConn, strSQL, objRS
Dim ot As String = Request.Params("var")
Dim id_key As String = "Distribucion/99999998/MSCR_104/" + ot



oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/Practica/DocAs99999998.mdb"))
strSQL = "select [BinariFile], [NombreFichero] from DocAsoc where [Key] = '" + id_key + "'"
objRS = oConn.Execute(strSQL)

Dim a() As Byte = objRS.fields("BinariFile").value
Dim NuevaCadenaPDF As String = System.Text.Encoding.ASCII.GetString(a)
Response.Clear()
Response.ClearHeaders()
Response.Buffer = True
Response.ContentType = "application/pdf"
Dim filename As String = objRS.fields("NombreFichero").value.ToString
Response.AddHeader("content-disposition", "inline; filename=" + filename)
Response.Write(NuevaCadenaPDF)
Response.Flush()
Response.End()




objRS.close()
oConn.close()
objRS = Nothing
oConn = Nothing

%>

[cazadorpuebla]

POR FIN!!!!!!!!!!!!!

al final era mucho más simple de lo que yo creía

Solución:

Response.ContentType = "application/pdf"
Response.BinaryWrite(objRS.fields("BinariFile").va lue)
Response.End()