Visa ett inlägg
Oläst 2006-05-15, 10:36 #5
Staffconsulting Staffconsulting är inte uppkopplad
Flitig postare
 
Reg.datum: May 2004
Inlägg: 358
Staffconsulting Staffconsulting är inte uppkopplad
Flitig postare
 
Reg.datum: May 2004
Inlägg: 358
Har inte lösningen åt dig för jag använder en komponent men du kanske kan fila ihop en kod med hjälp utav detta :

vFileName = Request.Querystring("filnamn")

If InStr(Request.Servervariables ("HTTP_USER_AGENT"),"5.5") > 0 Then
Response.Addheader "Content-Disposition", "inline; filename=" & vFileName
Else
Response.Addheader "Content-Disposition", "attachment; filename=" & vFileName
End If

' Filsystemet laddar ner filen :
set oFS = Server.CreateObject("SoftArtisans.FileManager")
set oF = oFS.GetFile(vFullPath)
Response.AddHeader "Content-Length", oF.Size
set oF = nothing
set oFS = nothing
' ** Fixar så nerladdning i IE 5.5 fungerar : **
If InStr(Request.Servervariables ("HTTP_USER_AGENT"),"5.5") > 0 Then
Response.ContentType = "application/download"
Else
Response.ContentType = "application/x-msdownload"
End If

Response.CacheControl = "public"

Set oDownload = Server.CreateObject("SoftArtisans.FileUp")

oDownload.TransferFile vFullPath
Staffconsulting är inte uppkopplad   Svara med citatSvara med citat