ASP的问题!来帮我解读一下这段代码!

来源:百度知道 编辑:UC知道 时间:2024/05/30 11:50:34
<%
Dim strFilePath, strFileSize, strFileName
Const adTypeBinary = 1
Response.Buffer = True
strFileName="123.gif"
FilePath=Server.MapPath(""&strFileName)
Response.Clear

Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadFromFile FilePath

strFileSize =objStream.size
strFileType = lcase(Right(strFileName, 4)) '文件扩展名

' 通过文件扩展名判断 Content-Types
Select Case strFileType
Case ".gif"
ContentType = "image/gif"
Case ".mp3"
ContentType = "audio/mpeg3"
Case ".mpg", "mpeg"
Case Else
'Handle All Other Files
ContentType = "application/octet-stream"
End Select
Response.AddHeader "Content-Disposition", "attachment; filename= "&strFileName&&qu

这是下载页面的代码吧?
应该如果省略Response.AddHeader "Content-Disposition", "attachment; filename= "&strFileName&""
便会出现弹窗让浏览者选择时候下载.而不是直接在浏览器中打开!