主题：移动开发 jpeg图片显示不了

移动开发  做了个上传图片的功能
此主题相关图片如下：2.jpg


此主题相关图片如下：3.jpg

1、图片文件，要上传到 web 文件夹下才行；

 

2、你在web文件夹放一个jpg或者jpeg文件，然后在浏览器直接输入网址，看能否访问。如果不能访问，说明你add的代码没有执行。

图片已上传至服务器了

我把扩展名改为jpg，把数据库里记录的文件名的扩展名也改为jpg

就能正常显示了

重新执行下面代码

 

HttpServer.Close
HttpServer.Prefixes.Add("http://*/")
HttpServer.Extensions.add(".jpeg")
HttpServer.Start()

如果还有问题，就删除或者修改下面代码

 

If filesys.FileExists(fl)
    Dim idx As Integer = fl.LastIndexOf(".")
    Dim ext As String  = fl.SubString(idx)
    Select Case ext
        Case ".doc",".jpg",".gif",".png",".bmp",".wmf",".js",".htm",".html",".css",".zip",".rar",".jpeg" '这里加上了js扩展名
            e.WriteFile(fl)
            Return '这里必须返回
    End Select
End If

4楼方法不行，5楼方法可以

感觉HttpServer.Extensions.add 这个命令不好用啊

是不是bug？

 

不是bug，如果你用了add，你要把5楼的那段代码删掉才行。

先试了4楼的add方法（没用5楼代码），无效

后改用5楼的方法才有效

 

不是bug，你可以把5楼的那段代码删掉，然后用4楼代码。