- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 移动开发中 专业报表生成PDF 有没有办法直接指定下载PDF文件而不是htm呢？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=160972)
-- 发布时间：2021/2/28 0:56:00
-- 移动开发中 专业报表生成PDF 有没有办法直接指定下载PDF文件而不是htm呢？
移动开发中 专业报表生成网页
在电脑上打开127.0.0.1/baobiao.htm可以直接浏览器PDF显示
在手机端无法直接显示PDF，网页会提示下载baobiao. htm 打开是乱码
有没有办法直接提示下载baobiao. pdf 呢？
[此贴子已经被作者于2021/2/28 21:03:41编辑过]
-- 发布时间：2021/2/28 21:04:00
--
127.0.0.1/baobiao.htm
改为
127.0.0.1/baobiao.pdf
代码也改为判断baobiao.pdf而不是baobiao.htm
-- 发布时间：2021/2/28 21:05:00
-- 回复：（cnsjroom）移动开发中 专业报表生成PDF 有没...
想学一学 老师们指导下 谢谢
-- 发布时间：2021/2/28 21:11:00
-- 回复：（有点蓝）127.0.0.1/baobiao.htm改为127.0.0.1...
建议实际开发的时候，建议在HttpRqeust事件的开始位置都加上一段代码，用于发送已经存在的常见文件：
\'通用事件头,用于发送已经存在的常见文件
Dim fl As
String = "d:\\web\\" &
e.path
If filesys.FileExists(fl)
Dim
idx As
Integer = fl.LastIndexOf(".")
Dim
ext As
String = fl.SubString(idx)
Select
Case ext
Case
".jpg",".gif",".png",".bmp",".wmf",".js",".css" ,".PDF",".htm",".zip",".rar"
e.WriteFile(fl)
Return
\'这里必须返回
End
Select
End
If
\'以下是动态生成网页的代码
Select
Case e.Path
Case
"baobiao1.pdf"
\'生成新增页面
Case
Else
e.WriteString("糟糕,文件未找到！")
End
Select
这样么？但是项目发布后 有没有办法后续不重新生成项目的情况下 更改这个部分的代码呢？
-- 发布时间：2021/2/28 21:56:00
--
没有办法