PALMisLIFE 討論區

標題: [求助] [HTML] 下載檔案的語法！ [列印本頁]
作者: johnnyk    時間: 2004-8-17 10:20
標題: [求助] [HTML] 下載檔案的語法！
要在網頁上讓User下載.txt檔案

<a href="abc.txt">文字</a>
使用這種方式會直接開啟文件，而不會出現下載視窗

解決方法一：壓縮成ZIP檔
解決方法二：按右鍵另存新檔

不過以上二種方法都不可行，因為User對電腦操作不熟(就是很多人說的電腦白X)

能不能"點一下左鍵就下載"？！

(JavaScript、ASP、HTML 語法皆可)

[ Last edited by johnnyk on 2004-8-17 at 10:21 ]
作者: Dragoon    時間: 2004-8-17 11:14
標題: Re: [求助] [HTML] 下載檔案的語法！
這要從  http 的 header 下手...
不是 html 的 header 喔!

這邊是 RFC
http://www.w3.org/Protocols/rfc2616/rfc2616-sec14.html

通常要配合主機端語言來做控制(ASP, PHP, JSP, Perl, CGI 等), 無法單獨的用
  1. <a href="download.txt">下載</a>
複製代碼

這樣來解決.

我提供我參考別人修改來的ㄧ段 PHP 程式碼:

  2. function echoFileHeader($mName, $mSize, $mContent = 'application/octet-stream')
  3. {
  4.         GLOBAL $HTTP_SERVER_VARS;

  6.         if(strpos($HTTP_SERVER_VARS['HTTP_USER_AGENT'], 'MSIE')){
  7.                 // IE cannot download from sessions without a cache
  8.                 header('Cache-Control: public');
  9.         } else {
  10.                 header('Cache-Control: private');
  11.         }
  12.         header("Content-type: $mContent");
  13.         header("Content-length:" . (string)($mSize) );
  14.         //header("Content-Disposition:inline; filename=\"" . $mName . "\"");
  15.         if (strpos($HTTP_SERVER_VARS['HTTP_USER_AGENT'], 'MSIE')) {
  16.                 header("Content-Disposition:attachment; filename=\"" . $mName . "%20\"");
  17.         } else {
  18.                 header("Content-Disposition:attachment; filename=\"" . $mName . "\"");
  19.         }

  21.         return TRUE;
  22. }
複製代碼

這邊的 header() 是對 HTTP 送出 HEADER, 並不是 HTML 裡面的 header, 請注意.
對 IE 要對檔名另作處理, 好像是因為 5.0 or 6.0 的一個 bug(記不太得了)
有問題再繼續討論~
作者: ddthehe    時間: 2004-8-17 21:44
標題: Re: [求助] [HTML] 下載檔案的語法！
這段原碼是從藍色小舖來的哦，應該改一下（檔案類性的地方）或不用改就可以了，沒有測試ASP的平台懶得試了 …

download.asp 的內容：

  2. <%
  3. Response.Buffer = True
  4. Dim strFilePath, strFileSize, strFileName
  5. Const adTypeBinary = 1
  6. strFilePath = Request.QueryString("File")
  7. strFileSize = Request.QueryString("Size")
  8. strFileName = Request.QueryString("Name")
  9. Response.Clear
  10. Set objStream = Server.CreateObject("ADODB.Stream")
  11. objStream.Open
  12. objStream.Type = adTypeBinary
  13. objStream.LoadFromFile server.mappath(strFilePath)
  14. strFileType = lcase(Right(strFileName, 4))
  15. Select Case strFileType
  16. Case ".asf"
  17. ContentType = "video/x-ms-asf"
  18. Case ".avi"
  19. ContentType = "video/avi"
  20. Case ".doc"
  21. ContentType = "application/msword"
  22. Case ".zip"
  23. ContentType = "application/zip"
  24. Case ".xls"
  25. ContentType = "application/vnd.ms-excel"
  26. Case ".gif"
  27. ContentType = "image/gif"
  28. Case ".jpg", "jpeg"
  29. ContentType = "image/jpeg"
  30. Case ".wav"
  31. ContentType = "audio/wav"
  32. Case ".mp3"
  33. ContentType = "audio/mpeg3"
  34. Case ".mpg", "mpeg"
  35. ContentType = "video/mpeg"
  36. Case ".rtf"
  37. ContentType = "application/rtf"
  38. Case ".htm", "html"
  39. ContentType = "text/html"
  40. Case ".asp"
  41. ContentType = "text/asp"
  42. Case Else
  43. ContentType = "application/octet-stream"
  44. End Select
  45. Response.AddHeader "Content-Disposition", "attachment; filename=" & strFileName
  46. Response.AddHeader "Content-Length", strFileSize
  47. Response.Charset = "UTF-8"
  48. Response.ContentType = ContentType
  49. Response.BinaryWrite objStream.Read
  50. Response.Flush
  51. objStream.Close
  52. Set objStream = Nothing
  53. %>
複製代碼


用「download.asp?File=檔名」的連結就可以直接下載了 ～



歡迎光臨 PALMisLIFE 討論區 (http://f.pil.tw/) Powered by Discuz! X2.5