主题：图片怎么读不出来？

                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