我正在尝试将 pdf 文件写入浏览器,当客户端打印 pdf 时,发送到打印机的文件名是文件的名称。但现在我正在获取发送到浏览器“loadfile.asp”的asp页面的名称
因为我在使用时无法在页面中添加标题Response.ContentType = "application/pdf"
,所以我添加了一个执行server.Transfer
.
但是每次代码通过时Response.ContentType = "application/pdf"
,标题都会被空白。
所以这是我的代码: 第一页:
<html>
<head>
<title>
<%= Request.QueryString("File") & ".PDF" %>
</title>
</head>
<body>
<%
Server.Transfer "loadfileAfter.asp"
%>
</body>
</html>
这是第二页(loadfileAfter.asp):
Response.ContentType = "application/pdf"
Response.AddHeader "content-disposition", "Filename=" & Request.QueryString("File") & ".PDF"
Const adTypeBinary = 1
strFilePath = "D:\" & Request.QueryString("File") & ".PDF" 'This is the path to the file on disk.
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadFromFile strFilePath
Response.BinaryWrite objStream.Read
objStream.Close
Set objStream = Nothing
我坚信这条线会有所帮助:
Response.AddHeader "content-disposition", "Filename=" & Request.QueryString("File") & ".PDF"
但这并没有改变任何事情。
谢谢你的帮助