以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  图片怎么读不出来?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=174481)

--  作者:kylin
--  发布时间:2022/1/17 23:56:00
--  图片怎么读不出来?
代码片段如下:
                Dim fl As String = "D:\\Foxtable\\" & 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",".jpeg",".bmp",".wmf" \'只允许请求图片文件
                            e.WriteFile(fl)
                    End Select
                Else
                    Dim sb As New StringBuilder
                    sb.Appendline("我想显示一个图片<br/><br/>")
                    sb.AppendLine("<img src=\'amr023.jpeg\' /><img src=\'amr024.jpeg\'  />")
                    e.WriteString(sb.ToString())
                End If

图片出不来,如下:
图片点击可在新窗口打开查看此主题相关图片如下:图片1.png
图片点击可在新窗口打开查看
tpcs.htm:2 GET http://xx.xx.xxx.xxx:8022/amr024.jpeg 404 (foxtable web server has started(error 404)) 
tpcs.htm:2 GET http://xx.xx.xxx.xxx:8022/amr023.jpeg 404 (foxtable web server has started(error 404))

 【xx是具体网址,这个是正确的没有问题,有意隐去】

--  作者:有点蓝
--  发布时间:2022/1/18 8:46:00
--  
这个路径下面没有图片

Dim fl As String = "D:\\Foxtable\\" & e.path

--  作者:kylin
--  发布时间:2022/1/18 9:32:00
--  
图片点击可在新窗口打开查看