谁有知道怎么上传PDF格式文件的网页代码
发布网友
发布时间：2022-04-19 23:45
共2个回答
热心网友
时间：2022-04-20 01:14
http://hi.baidu.com/94463874/blog/item/2b41652383fd1e559822ed93.html
下面的表格显示不正常。
在网页中使用PDF文档：
用户可HTML <HREF> 标记从 HTML 文档链接到PDF文档。当网络用户单击HTML 页上的该链接时，PDF 文档打开。该文档可充满整个浏览器窗口，或启动作为帮助应用程序的一个 Acrobat 阅读器，这取决于用户如何配置其网络浏览器 。
以下例子使用 <HREF> 链接到一个 PDF 文档：
<a href=http://www.adobe.com/illustrator.pdf>
您也可指定打开 PDF 文档后可对它执行的动作。例如，您可能想打开文档至某一特别页面或目标，或显示书签。要与 <HREF> 链接一起放入一个动作命令，可紧接在 PDF 文件名后面键入数字符号 (#) 和该命令。
以下表格显示可能的动作命令。请为 PDF 文档用具体指令来替换变量 (以斜体字表示 )。方括号 ([ ]) 中的变量是可选项。
说明
命令
备注
跳页
page= page_number
页码必须是整数。 PDF 文件第一页的页码是 1 。
跳至目标
nameddest=destination_string
缩放或滚动页
zoom=scale[ , left, top ]
所有值必须用整数或浮点表示。比例 100 表示 100% 缩放。左和右的滚动值为用户坐标 (0,0 代表可见页面的左上角，与页面方向无关 )。
设置页面视图
view=Fit
view=FitH[, top]
view=FitV[, left]
view=FitB
view=FitBH[, top]
view=FitBV[, left]
Fit 、 FitH 等等是便携式文档格式引用手册 - Portable DocumentFormat Reference Manual(www.adobe.com) 中所定义的。左和右的滚动值必须用整数或浮点表示。这些值是用户坐标(0,0 代表可见页面的左上角，与页面方向无关 )。
设置长方形视图的位置和大小
viewrect=left,top, width,height
所有值必须用整数或浮点表示。左和右的滚动值必须用整数或浮点表示。这些值是用户坐标(0,0 代表可见页面的左上角，与页面方向无关 )。
显示书签或缩略图
pagemode=mode
值可以是bookmarks 、 thumbs和 none 。
显示滚动条
scrollbar= boolean_value
值可以是 true 和 false
Display the tool
bar
toolbar=布儿值
值可以是 true 和 false
（注：动作命令不区分大小写，在 URL 命令行中可以没有空格，每个命令的长度最多为 32 个字符。如果您提供浮点值，则小数点后面只有一位数字会被使用。）
使用 <EMBED> 标记在在HTML中嵌入 PDF 文档
您可使用 HTML <EMBED> 标记在 HTML 中嵌入 PDF 文档。通过嵌入可在HTML 文档中显示 PDF 文档页面的图像。与 Netscape Navigator 3.0 或更高版本以及 Internet Explorer 3.0 或更高版本兼容的浏览器支持 <EMBED> 标记。Internet Explorer 使用与 Internet Explorer 3.0 或更高版本兼容的浏览器的读者可浏览嵌入的 PDF 文档。
（注：如果嵌入的 PDF 文档显示在与 Internet Explorer 兼容的浏览器窗口中，则 Acrobat 工具栏、命令栏和窗口控制均为默认显示；可通过在“打开信息”对话框中 “文件” > “文档信息” > “打开” 为 PDF 文档更改设置来隐藏这些项目。如果嵌入的 PDF 文档显示在与 Netscape Navigator 兼容的浏览器的窗口中，则 Acrobat 工具栏、命令栏和窗口控制都不显示。）
使用 <OBJECT> 标记在HTML 中嵌入PDF 文档
如果您的用户使用与 Internet Explorer 兼容、支持 ActiveX 控件的浏览器，您可用 <OBJECT> 标记嵌入 PDF 文档，而不需用 <EMBED> 标记。与Internet Explorer 3.0 或更高版本兼容的浏览器能支持 <OBJECT> 标记。
还以刚才教程为例，使用ActiveX控键，在html中嵌入以下代码：
<object classid="clsid:CA8A9780-280D-11CF-A24D-444553540000" width="760" height="411" border="0">
<param name="_Version" value="65539">
<param name="_ExtentX" value="20108">
<param name="_ExtentY" value="10866">
<param name="_StockProps" value="0">
<param name="SRC" value="illustrator.pdf">
</object>
就可以在网页中直接浏览PDF文档了！
看看对你有用不，我也没有测试。
热心网友
时间：2022-04-20 02:32
Protected Sub CreatePDF(ByVal strProgramID As String, ByVal strSQL As String, ByVal strQfmUrl As String)
Try
Dim fw As FormWriter = PrintStreamHelper.pubGetPDFStream(strProgramID, strSQL, Server.MapPath(strQfmUrl), Server.MapPath("."))
fw.Submit()
Response.ClearHeaders()
' 作成されたPDFをクライアントに返します
Response.AddHeader("Content-Disposition", "attachment;filename=" & fw.File)
Response.ContentType = "application/pdf"
Response.Clear()
Response.TransmitFile(Path.Combine(fw.Spool, fw.File))
Response.Flush()
'Response.End() 'UPDATE 2008/12/26
HttpContext.Current.ApplicationInstance.CompleteRequest()
Response.Close()
Catch ex As Exception
' エラーが発生した场合はメッセージを表示します
Throw ex
End Try
End Sub
Public Shared Function pubGetPDFStream(ByVal strProgramID As String, ByVal strSQL As String, ByVal strQfmUrl As String, ByVal strPath As String, ByVal strListValue As String) As FormWriter
Dim fw As FormWriter = New FormWriter
' フォームファイルを指定します
fw.Form = strQfmUrl 'Server.MapPath("sample4.qfm")
' カレントディレクトリを指定します
fw.Path = strPath 'Server.MapPath(".")
fw.Param("sSQL") = strSQL
fw.Param("sListValue") = strListValue
' 出力先のディレクトリを指定します
Dim dir As String = Path.Combine(Path.GetTempPath(), "RSP/TOPS/")
Directory.CreateDirectory(dir)
fw.Spool = dir
Dim nowTimeString As String = strProgramID + "_" + DateTime.Now.ToString("yyyyMMddhhmmss")
fw.Data = ConfigurationManager.AppSettings("PrintStreamODBC")
'fw.Data = "ODBC;DSN=TOPS;UID=TOPS;PWD=TOPS;SERVER=orcl;"
' 出力形式にPDFを指定します
fw.Device = FormWriter.PDF
' PDFのファイル名を指定します
fw.File = nowTimeString + ".pdf"
' 既存のPDFファイルを削除します
File.Delete(Path.Combine(fw.Spool, fw.File))
Return fw
End Function
