关于将数据库中图片显示到页面？

[hsdly]

关于将数据库中图片显示到页面？

[hjwzr]

页面弹出保存对话框让我保存页面！
是你还需要一个页面如下：
--------------------showpic.asp该页面只能显示一副图片-----------------------
<%"<img src=" & "showImage.asp" & ">"%>
----------------------------------------------------------------------------

出现乱码可能是下面这个页面写错的缘故，这个页面就是你说要下载的页面
，其实它是图片的二进制数据。注意下面的页面，不能添加多余的输出语句
否则就可能造成，输出的图片是乱码。
----------------------------------------------------------------------
set conn=server.createobject("ADODB.Connection")
set rs=server.createobject("ADODB.Recordset")
conn.ConnectionString ="Provider=Microsoft.jet.oledb.4.0;Data Source=" & server.mappath("photo.mdb")
conn.open
rs.open "select * from myphoto where ID=" &"'" & txtid & "'" ,conn,1,1
response.ContentType="image"
imagsize=rs.fields("img").ActualSize
response.BinaryWrite rs.fields("img").GetChunk(imagsize)
---------------------------------------------------------------------------------

[hsdly]

谢谢

[甘泉123]

<%
dim conn,connstr,db
'更改数据库名字
db="data/home.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
'connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'如果你的服务器采用较老版本Access驱动，请用下面连接方法
connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
conn.Open connstr
function CloseDatabase
Conn.close
Set conn = Nothing
End Function

set rs=conn.execute("select c_pic from app_photo where c_id="&request.QueryString("id"))

response.ContentType="Image/*"
Response.BinaryWrite rs(0)

rs.close
set rs=nothing
disconn
%>

[54duke]

?? 你想告诉我们 还是想问什么 ??

[甘泉123]

上边的是showImage.asp文件
显示页面这么写
<img id=preview src=showImage.asp?id=<%=request.QueryString("id")%> border=0 >

[hsdly]

可是一运行，页面就弹出保存对话框让我保存页面！

[hsdly]

还有没有更好的办法

[mongren]

<img src=showImage.asp?id=<%=request.QueryString("id")%> border=0 >


起码我这样是可以的

[happymingnan]

乱码，做何解释

[hsdly]

就是这样

[hsdly]

gz