Mostrar ficheros

20/07/2004 - 17:42 por alechu | Informe spam
Hola a todos, a ver si alguien me puede ayudar que no se
pordonde falla esto.

tengo unos ficheros en bbdd sql (campo tipo binary) y
quiero que me lo abra en la misma pagina sin preguntarme
nada y lo que me hace es preguntarme que quiero hacer si
abrirlo, guardarlo, etc (como cuando descargas un fichero)

os dejo el codigo aver si veis algo que yo me he pasado
algo

Private Sub Page_Load...

consulta = "select ."
Dim ds As New System.data.DataSet
Dim da As New SqlDataAdapter(consulta.ToString(), cn)
da.Fill(ds, "normativas")
dt = ds.Tables("normativas")
miFichero = CType(dt.Rows(0)(0), Byte())
Response.Buffer = True

Response.AddHeader("Content-
Disposition", "attachment;filename=normativa.xls")

Response.ContentType = Request.QueryString("tipo")
Response.BinaryWrite(miFichero)
Response.End()

End Sub


mucas gracias a todos.

pd. aqui es donde todos aprendemos
 

Leer las respuestas

#1 Gustavo The Wolf Cantero
20/07/2004 - 22:20 | Informe spam
Debes quitar el texto attachment del header, quedando así: Response.AddHeader("Content-Disposition", "filename=normativa.xls"). También asegúrate que el ContentType sea "application/vnd.ms-excel" (vi que le asignas uno que te pasan por QUeryString).
Suerte!
Gustavo A. Cantero
Microsoft Certified Solution Developer
DCE Tercera Estrella


"alechu" wrote:

Hola a todos, a ver si alguien me puede ayudar que no se
pordonde falla esto.

tengo unos ficheros en bbdd sql (campo tipo binary) y
quiero que me lo abra en la misma pagina sin preguntarme
nada y lo que me hace es preguntarme que quiero hacer si
abrirlo, guardarlo, etc (como cuando descargas un fichero)

os dejo el codigo aver si veis algo que yo me he pasado
algo

Private Sub Page_Load...

consulta = "select ."
Dim ds As New System.data.DataSet
Dim da As New SqlDataAdapter(consulta.ToString(), cn)
da.Fill(ds, "normativas")
dt = ds.Tables("normativas")
miFichero = CType(dt.Rows(0)(0), Byte())
Response.Buffer = True

Response.AddHeader("Content-
Disposition", "attachment;filename=normativa.xls")

Response.ContentType = Request.QueryString("tipo")
Response.BinaryWrite(miFichero)
Response.End()

End Sub


mucas gracias a todos.

pd. aqui es donde todos aprendemos

Preguntas similares