如果多张可能要读多次
你可以参考一下这里的图片的读取
http://expert.csdn.net/Expert/topic/2514/2514696.xml?temp=.3321955

解决方案 »

  1.   

    .....
     while read.read
     Response.Write("<img src=../include/WriteImg.aspx?ID=" & read(imgid) & " vspace=10 id=pic>")
    end whileWriteImg.aspx中就是根据传递的ID读取用response.BinaryWrite读取图片这种读取一张图片是没问题的,但不知道在一张页面上显示多张图片能不能行?关注!
      

  2.   

    我刚才试过了,这种方法是可以的!
      Dim i As Integer
            Dim rs As OleDbDataAdapter
            Dim rsdset As New DataSet
            Dim rstab As DataTable
            rs = New OleDbDataAdapter("select * from files", conn)
            rs.Fill(rsdset, "files")
            rstab = rsdset.Tables("files")
            For i = 0 To rstab.Rows.Count - 1
                Response.Write("<img src=../include/WriteImg.aspx?ID=" & rstab.Rows(i).Item("FILE_ID") & ">")
                Response.Write("<br>")
            Next
      

  3.   

    writeimg.aspx
     Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim rs As OleDbDataAdapter
            Dim rsdset As New DataSet
            Dim rstab As DataTable
            Dim rsfile As DataTable
            Dim img_id
            img_id = Request("ID")
            Response.Expires = 0
            Response.Buffer = True
            Response.Clear()
            If img_id = "" Then img_id = 0
            rs = New OleDbDataAdapter("SELECT * from FILES where FILE_ID='" & img_id & "'", conn)
            rs.Fill(rsdset, "FILES")
            rsfile = rsdset.Tables("FILES")
            If Not rsfile.Rows.Count = 0 Then            Response.ContentType = rsfile.Rows(0).Item("CONTENT_TYPE")            Response.BinaryWrite(rsfile.Rows(0).Item("CONTENT"))
            Else
                rs = New OleDbDataAdapter("select * from FILES where FILE_ID=1", conn)
                rs.Fill(rsdset, "FILES")
                rsfile = rsdset.Tables("FILES")
                If Not rsfile.Rows.Count = 0 Then                Response.ContentType = rsfile.Rows(0).Item("CONTENT_TYPE")                Response.BinaryWrite(rsfile.Rows(0).Item("CONTENT"))
                End If
            End If
            rsfile = Nothing
            Response.End()
    end sub
      

  4.   

    不用这么麻烦,假设数据库里面的图片有两张,其ID分别是1和2
    然后把你已经实现的读取数据库图片的代码放在一个专门的.aspx文件里面,起名叫BuildImage.aspx,其中PageLoad里面存放读取查询字符串的代码
    然后在使用图片的地方用这个代码
    <img hrlf="buildimage.aspx?ID=1">
    上面的代码就是读取编号为1的图片。
    这样可以在网页中使用任意图片。