Estimados, tengo un código que inserta archivos en una base de datos en access, lo hace perfecto y los descargar por una pagina también.
El tema es que el access lo estamos migrando a SQL server 2008 y no me funciona la descarga de archivos, adjunto el código por si alguien me puede ayudar a encontrar el problema, ya que le he dado miles de vueltas y no encuentro la solución:
Con esto lleno la BD :
RS.Open "upload", conexion, 2, 2
RS.AddNew
'Store extra form info.
RS("id_compra") = Form("id_compra")
RS("DESCRIPTION") = Form("descripcion")
RS("UPloadDT") = now()
RS("User_upload") = usuario
'Add file from source field 'SourceFile' to table field 'Data'
RS("Data") = Form("SourceFile").ByteArray
RS("ContentType") = Form("SourceFile").ContentType
RS("SourceFileName") = Form("SourceFile").FileName
RS("DataSize") = Form("SourceFile").Length
RS.Update
RS.Close
y con esto descargo el archivo :
<%
SQL = "SELECT * FROM Upload where UploadID = " & Request("UploadID")
rs.Open Sql, Conexion
If rs.EOF Then
' no hace nada
else
Response.ContentType = "application/octet-stream"
' Let the browser know the file name
Response.AddHeader "Content-Disposition", "attachment;filename=" & Trim(rs("SourceFileName"))
' Let the browser know the file size
Response.AddHeader "Content-Length", CStr(rs("DataSize"))
' Send actual file
Response.BinaryWrite rs("Data")
end if %>
Diseño de la TABLA Upload :
DataSize int
Data image
ContentType nvarchar(255)
SourceFileName nvarchar(255)
De antemano gracias !!
Saludos
