Hola.
Tengo una pagina desde donde me puedo descargar documentos(word,pdf) del servidor.
El codigo que utilizo es el siguiente:
<%
Response.Buffer = True
' Cadena de conexion
Dim connStr
Set Con = Server.CreateObject("ADODB.Connection")
Con.Open "Driver={MySQL};SERVER=lldd216.servidoresdns.net;P ort=3306;Database=xx;Uid=xx;Pwd=xx;"
' Recordset
Dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
' abrimos la conexion
sql= "select * from prueba"
Set rs = con.Execute(sql)
If Not rs.EOF Then
strFileName = rs("triptico")
ContentType = "text/plain,application/msword, application/pdf"
Response.AddHeader "Content-Disposition", "attachment; filename=" & strFileName
Response.ContentType = ContentType
Response.BinaryWrite rs("triptico")
End If
rs.Close
Set rs = Nothing
%>
Me lo descarga supuestamente bien. El problema me da a la hora de abrir ese documento. Me da el siguiente error:
Adobe Reader no pudo abrir dicho documento debido a que no es un archivo admitido o esta dañado.
A alguien le ha ocurrido algo parecido?
Gracias.
