请教：读取数据库，显示附件问题

Question

代码不执行，没有错误显示。请教高手！
       
 Dim sql, strfilename As String
        cn.Open()
        sql = "SELECT * FROM " & Request.QueryString("tbl") & " WHERE ID=" & Request.QueryString("id")
        Dim dr_read As SqlDataReader
        Dim oCommand As New SqlCommand(sql, cn)        dr_read = oCommand.ExecuteReader()        If dr_read.Read() Then            Response.Clear()
            strfilename = dr_read("FILENAME")            Response.AddHeader("Content-Disposition", "inline;filename=" + HttpUtility.UrlEncode(strfilename, Encoding.UTF8))
            Response.AddHeader("Content-Length", dr_read("FILELENGTH"))
            Response.AddHeader("Content-Type", dr_read("FILEFMT"))
            Response.OutputStream.Write(CType(dr_read("FILEDATA"), Byte()), 0, dr_read("FILELENGTH"))        End If
        dr_read.Close()
        cn.Close()
        Response.End()数据库

Answer 1

表示问题没有描述清楚“显示附件问题”？
 Response.AddHeader("Content-Disposition", "inline;filename=" + HttpUtility.UrlEncode(strfilename, Encoding.UTF8)) 这里报错？先断点检查下问题的地方吧