Avatar billede syncroniq Nybegynder
25. januar 2007 - 20:13 Der er 1 kommentar

Downloade Access fil fra web

Hey,

Jeg fandt noget simpelt kode på nettet, men når jeg har downloaded databasen, kan access ikke genkende filen. Nogen der ved hvad der er galt?

Her er kode (med to foreslag endda):

-------------------------------------------------
<%
Response.ContentType = "application/mdb"
Response.AddHeader "Content-Transfer-Encoding", "binary;"
Response.AddHeader "Content-Disposition", "attachment; filename=backup.mdb;"

thepath = server.mappath("/") & "\backup\menu.mdb"

'SOLUTION 1

set fsob = Server.CreateObject("Scripting.FileSystemObject")
set thefile = fsob.OpentextFile(thepath)
response.BinaryWrite(thefile.ReadAll)


'SOLUTION 2

Set fsob = Server.CreateObject("Scripting.FileSystemObject")
set thefile = fsob.getfile(thepath)
Set ts = thefile.OpenAsTextStream(1,-1)
response.BinaryWrite(ts.ReadAll)
ts.close
set ts = Nothing

set fsob = Nothing
set thefile = Nothing
%>

--------------------------------------------
Avatar billede syncroniq Nybegynder
25. januar 2007 - 20:26 #1
Hey,

Fandt et script mere, men det giver præcis samme resultat... :(

-----------------------------------
<%

strFilename = server.mappath("/") & "\db\menu.mdb"

Response.Buffer = True
Response.Clear

Set s = Server.CreateObject("ADODB.Stream")
s.Open
s.Type = 1

Set fso = Server.CreateObject("Scripting.FileSystemObject")

Set f = fso.GetFile(strFilename)
intFilelength = f.size

s.LoadFromFile(strFilename)


Response.AddHeader "Content-Disposition", "attachment; filename=" & f.name
Response.AddHeader "Content-Length", intFilelength
Response.Charset = "UTF-8"
Response.ContentType = "application/octet-stream"


thepath = server.mappath("/") & "\db\menu.mdb"

set fsob = Server.CreateObject("Scripting.FileSystemObject")
set thefile = fsob.OpentextFile(thepath)
response.BinaryWrite(thefile.ReadAll)

set fsob = No
------------------------------
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester