ASP提取ACCESS数据库再显示图片，请求前辈指点

mom213 发布于 2011-02-13 16:50， 569 次点击

Untitled-12.asp
<%
dim connGraph,rec,strsql
set connGraph=server.CreateObject("ADODB.connection")
connGraph.open"dsn=q3;"
set rec=server.createobject("ADODB.recordset")
strsql="select * from img"
rec.open strsql,connGraph,1,1
Response.ContentType="image/*"
Response.BinaryWrite(rec("image").getChunk(75000))

%>

Untitled-13.asp
<html>

<body>
<a SRC="Untitled-12.asp?id=<%=rec("image")%>"></a>
</body>

</html>
Untitled-12.asp打不开，Untitled-13.asp打开是空的。请求前辈指点
我的想法是直接提取ACCESS数据把图片显示出来就可以了

4 回复

mom2132011-02-13 16:52

打开Untitled-12.asp的时候一直弹出下载Untitled-12.asp的页面

makebest2011-02-13 20:24

给你一点建议, 获取图像需要单独一个ASP文件, 用法示例：<IMG src="getimage.asp?id=1">
下面是 getimage.asp 的关键部分, 请参考:
data = rec.fields("image").value
Response.ContentType = rec.fields("filetype").value
Response.AddHeader "Content-Disposition","inline; filename=""" + rec("filename") + """"
Response.AddHeader "Content-Disposition","attachment; filename=""" + rec("filename") + """"
Response.BinaryWrite data

aspic2011-02-14 09:32

同上

gupiao1752011-02-14 14:06

以下是引用makebest在2011-2-13 20:24:51的发言：

给你一点建议, 获取图像需要单独一个ASP文件, 用法示例：
下面是 getimage.asp 的关键部分, 请参考:
data = rec.fields("image").value
Response.ContentType = rec.fields("filetype").value
Response.AddHeader "Content-Disposition","inline; filename=""" + rec("filename") + """"
Response.AddHeader "Content-Disposition","attachment; filename=""" + rec("filename") + """"
Response.BinaryWrite data

这个建议应该可行！