以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- foxtable加载的网页无法显示svg图片 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=141669) |
||||
-- 作者:cyf2257 -- 发布时间:2019/10/8 11:49:00 -- foxtable加载的网页无法显示svg图片
|
||||
-- 作者:有点蓝 -- 发布时间:2019/10/8 13:59:00 -- http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=97019&replyID=&skin=1 |
||||
-- 作者:cyf2257 -- 发布时间:2019/10/8 14:27:00 -- 还有没有其他的解决办法? <p>svg内容</p> 这个办法代码量太大了……
|
||||
-- 作者:有点蓝 -- 发布时间:2019/10/8 14:32:00 -- 使用其他标签啊:http://www.w3school.com.cn/svg/svg_inhtml.asp |
||||
-- 作者:cyf2257 -- 发布时间:2019/10/8 17:07:00 -- 使用其他标签也提示下载。。。。。 |
||||
-- 作者:有点蓝 -- 发布时间:2019/10/8 17:40:00 -- 需要使用自定义的事件头,去掉HttpServer.WebPath设置,html里使用object或者embed标签 httprequest事件开头加上 Dim fl As String = "d:\\ceshi\\" & 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" ,".html",".htm",".zip" e.WriteFile(fl) Return \'这里必须返回 Case ".svg" e.WriteString(filesys.ReadAllText(fl)) Return \'这里必须返回 End Select End If |
||||
-- 作者:cyf2257 -- 发布时间:2019/10/9 10:43:00 -- 已经解决了。 |