Bajar archivos

10/02/2007 - 08:01 por Turko | Informe spam

Estoy intentando bajar un archivo con ASP 3.0 con este código

File= "c:\bd1.mdb"
filename ="base.mdb"
Response.Buffer=True
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set File = FSO.GetFile(File)
Set TS=FSO.OpenTextFile(File)
'Response.contenttype="application/unknown"
Response.contenttype="application/vnd.ms-access"
Response.AddHeader "Content-Disposition", "attachment; filename=" & filename
Response.BinaryWrite TS.readall & ""
TS.close
Set TS = Nothing
Set File = Nothing
Set FSO = Nothing

Lo descarga perfecto, pero cuando lo quiero abrir con access me dice que el
no se reconoce el modelo de la Base de datos ...
Alguien me puede orientar porque puede suceder esto?

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 David Horno

10/02/2007 - 13:14 | Informe spam

¿No te sirve para descargar una BBDD este código de un botón?:

<input name="btnDescarga" type="button" class="boton" id="btnDescarga"
onClick="javascript:document.location.href='carpeta/bbdd.mdb';"
value="Descarga">

"Turko" escribió en el mensaje
news:

Estoy intentando bajar un archivo con ASP 3.0 con este código

File= "c:\bd1.mdb"
filename ="base.mdb"
Response.Buffer=True
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set File = FSO.GetFile(File)
Set TS=FSO.OpenTextFile(File)
'Response.contenttype="application/unknown"
Response.contenttype="application/vnd.ms-access"
Response.AddHeader "Content-Disposition", "attachment; filename=" &
filename
Response.BinaryWrite TS.readall & ""
TS.close
Set TS = Nothing
Set File = Nothing
Set FSO = Nothing

Lo descarga perfecto, pero cuando lo quiero abrir con access me dice que
el no se reconoce el modelo de la Base de datos ...
Alguien me puede orientar porque puede suceder esto?

Responder a este mensaje

#2 Dani Castillo

10/02/2007 - 15:14 | Informe spam

Hola Turko

Estas leyendo un archivo binario como texto, lo que produce que se pierda
informacion (y posiblemente solo leas los primeros bytes del archivo hasta
encontrar un valor '0' binario), el problema lo tienes en la lectura, el
volcado lo haces correcto con binarywrite

no tengo codigo propio a mano pero mira a ver si esto te sirve
http://campusvirtual.uma.es/emetpro...s/zeh3.asp

solo parte de ese archivo, el principio con los encabezados para evitar un
timeout , la funcion Function ReadBinaryFile(FileName)
y las lineas siguientes que hacen el response.addheader y
response.binarywrite , creo que te funcionara

"Turko" escribió en el mensaje
news:

Estoy intentando bajar un archivo con ASP 3.0 con este código

File= "c:\bd1.mdb"
filename ="base.mdb"
Response.Buffer=True
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set File = FSO.GetFile(File)
Set TS=FSO.OpenTextFile(File)
'Response.contenttype="application/unknown"
Response.contenttype="application/vnd.ms-access"
Response.AddHeader "Content-Disposition", "attachment; filename=" &
filename
Response.BinaryWrite TS.readall & ""
TS.close
Set TS = Nothing
Set File = Nothing
Set FSO = Nothing

Lo descarga perfecto, pero cuando lo quiero abrir con access me dice que
el no se reconoce el modelo de la Base de datos ...
Alguien me puede orientar porque puede suceder esto?

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida