asp存储图象？？？急。。。
下面的代码是从sqlserver里读出记录并显示：
show.asp
<%
set conn=server.CreateObject("ADODB.connection")
conn.open "Provider=SQLOLEDB.1;Password=father;Persist Security Info=True;User ID=sa;Initial Catalog=some;Data Source=ynqi"
set rec=server.createobject("ADODB.recordset")
rec.open "select * from mage where numss='11'",conn,1,1
if rec.eof and rec.bof then
response.write "no"
else
Response.ContentType = "image/gif"
datasize=rec("mages").actualsize
response.binarywrite rec("mages").getChunk(datasize)
end if
rec.close
set rec=nothing
set conn=nothing
%>
show.html
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
</HEAD>
<BODY>
<IMG SRC="show.asp">
</BODY>
</HTML>
没有报错，也不会显示 为什么？
问题点数：30、回复次数：8Top
1 楼hydnoahark（诺亚方舟）回复于 2001-05-24 12:57:00 得分 30
单独运行show.asp看看，如果还有问题，可能的原因：
1。Response.ContentType 类型错误
2。response.binarywrite rec("mages").getChunk(datasize)图片太大无法一次显示，必须分块显示，试试下面的代码：
lngOffset=0
conChunkSize=1024
lngPictSize=rs("FileContext").ActualSize
Do While lngOffset < lngPictSize
varChunk = rs("FileContext").GetChunk(conChunkSize)
Response.BinaryWrite varChunk
lngOffset = lngOffset + conChunkSize
If lngOffset > lngPictSize Then Exit Do
Loop
Top
2 楼hydnoahark（诺亚方舟）回复于 2001-05-24 12:58:00 得分 0
还有一个可能的原因就是图片数据在写入数据库的时候是错误的Top
3 楼Rukee（快活鱼－鱼儿鱼儿快快游,你不游水谁来游）回复于 2001-05-24 13:17:00 得分 0
不是这样子吧
show.html
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
</HEAD>
<BODY>
<IMG SRC="?????????这里是什么？??????????">
</BODY>
</HTML>
你试试做一个网页,把用记事本打开图片粘贴在那里试试,浏览网页能看到图片吗？
你要不就是浏览器直接读取show.asp;要不就是把图片写在服务器硬盘上，返回一个路径给
<img src=???>
Top
4 楼banyi（怎么去天堂）回复于 2001-05-24 16:14:00 得分 0
hydnoahark(诺亚方舟)老兄，没其他可能了吗？
还是不行啊我的图象才500kTop
5 楼banyi（怎么去天堂）回复于 2001-05-24 16:15:00 得分 0
hydnoahark(诺亚方舟)老兄，没其他可能了吗？
还是不行啊我的图象才22k, 多大算台大Top
6 楼hydnoahark（诺亚方舟）回复于 2001-05-24 17:29:00 得分 0
To:Rukee(快活鱼)
<img src="">src可以是一个返回图片数据的ASP文件或其他文件。
To:banyi()
应该只有上面的可能了。你是怎么将图片写进数据库的？Top
7 楼Rukee（快活鱼－鱼儿鱼儿快快游,你不游水谁来游）回复于 2001-05-25 09:56:00 得分 0
^_^，是我搞错了，抱歉抱歉
不过我想还是可以把VB把图像写一个文件到硬盘上，然后用看图工具来看，就知道写数据库时存得对不对了。Top
8 楼banyi（怎么去天堂）回复于 2001-05-25 11:07:00 得分 0
好了。解决了
在show.asp 开始加上：
response.expires=0
response.buffer=true
response.clear
Response.ContentType = "image/gif"Top
