来源:自学PHP网 时间:2015-04-14 14:51 作者: 阅读:次
[导读] aspx页面代码%@ Page Language=vb AutoEventWireup=false CodeBehind=4444_pdfLoad aspx vb Inherits=WebUI _pdfLoad % !DOCTYPE html PUBLIC - W3C DTD XHTML 1 0 Transition...
aspx页面代码
<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="4444_pdfLoad.aspx.vb" Inherits="WebUI._pdfLoad" %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml" > <head runat="server"> <title>PDF文件</title> </head> <body> <form id="form1" runat="server"> <div style ="overflow:auto "> <object classid="clsid:CA8A9780-280D-11CF-A24D-444553540000" width="100%" height="100%" border="0" top="-10" name="WebBrowser"> <param name="toolbar" value="false" /> <param name="_Version" value="65539" /> <param name="_ExtentX" value="20108" /> <param name="_ExtentY" value="10866" /> <param name="_StockProps" value="0" /> <param name="SRC" value="<%=filename %>" /> </object> </div> </form> </body> </html> vb代码
Imports System.IO Partial Public Class _pdfLoad Inherits System.Web.UI.Page Public filename As String Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load filename = "../../DownLoadFile/" + HttpUtility.UrlDecode(Request.QueryString("PDFFile")) If File.Exists(filename) = False Then Me.Page.ClientScript.RegisterStartupScript(Me.GetType, "msg", "<script language='javascript'>alert('文件不存在!');window.opener=null;window.close();</script>") Exit Sub End If End Sub
End Class
注: 此处的 filename必须使用相对路径,不可以使用server.mappath之类的绝对路径。
如果使用的是绝对路径,则在xp下的本地运行可以使用,发布后不可以使用!
|
自学PHP网专注网站建设学习,PHP程序学习,平面设计学习,以及操作系统学习
京ICP备14009008号-1@版权所有www.zixuephp.com
网站声明:本站所有视频,教程都由网友上传,站长收集和分享给大家学习使用,如由牵扯版权问题请联系站长邮箱904561283@qq.com