Hvordan med download af EPS filer

Lav hele molevitten om til zip-filer, så skulle den hente dem automatisk.....

IE only:

<a href="java script:void(0);" onclick="document.execCommand('SaveAs','1','fil.eps');">Save as</a>

Eller:

<%
call downloadFile(replace(replace(Request("file"),"\",""),"/",""))

function downloadFile(strFile)
    strFilename = server.MapPath(strFile)

    Response.Buffer = True
    Response.Clear

    ' create stream
    Set objStream = Server.CreateObject("ADODB.Stream")
    objStream.Open
    objStream.Type = 1

    on error resume next

    Set fso = Server.CreateObject("Scripting.FileSystemObject")
    if not fso.FileExists(strFilename) then
        Response.Write("<h1>Error:</h1>" & strFilename & " does not exist<p>")
        Response.End
    end if

    Set f = fso.GetFile(strFilename)
    intFilelength = f.size
    Set f = nothing
   
    objStream.LoadFromFile(strFilename)

    if err then
        Response.Write("<h1>Error: </h1>" & err.Description & "<p>")
        Response.End
    end if

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

    objStream.Close
    Set objStream = Nothing
    Set fso = nothing

end function
%>

ups.. hvis du altså kan benytte asp på din server

Eftersom jeg ikke er hjemme i asp holder jeg mig lidt fra den version. Jeg har ikke prøvet med at lave det til ZIP filer. Jeg har haft og har noget travlt for tiden :-/ IE only kan jeg godt bruge. Der sker bare det når jeg har hentet min egen esp fil igen siger photoshop at den ikke kan åben den da formatet er forkert.
Nogen fornuftig forklaring på det?

tak for hjælpen nu virker det. Det er mm12010's løsning jeg bruger men det er kun steen der har "svaret" er det kun mulighed for at give point til ham.

det er fordi jeg ikke poster svar, før du har tilkendegivet at det er mit forslag der er blevet løsningen på dit problem - men steen er sikkert fair og kender reglerne, så mon ikke vi findr ud af det... :o)