为什么Response.BinaryWrite(tp)显示图片总是下载,或显示乱码

za1mb2yc3 2005-11-13 10:57:52
Set OraSession=CreateObject("OracleInProcServer.XOraSession")
Set OraDatabase=OraSession.DbOpenDatabase(strDataSource,strUserID&"/"&strPassWord,0)
'打开数据库显示图片
Set rs=OraDatabase.CreateDynaset("select * from t_gt_tp where gtnm=2",0)

if rs.eof then
Response.Write "none"
else

'取出数据

size=65280
i=0
do
tp=Rs.Fields("tp").DbGetChunk(I*Size,Size)
' 以rs记录集的Fields对象的DbGetChunk方法在循环中读出数据

'Response.write Text

get_Size=Lenb(tp)
' 算出每次取出数据的详细字节数

I=I+1
Response.Write I
Response.End
Loop until get_size<Size

Response.Write i

'Response.End
Response.ContentType = "image/*"
'tp=lenB(rs("tp").GetChunk(0,20000))
'Response.Write tp

'Response.BinaryWrite(MIDB(rs("content").GetChunk(0,20000) ,1,k ))
Response.Write "???"
Response.BinaryWrite(tp)

end if

Response.Write "???"
set rs = nothing
...全文
263 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
尚和空四 2005-12-09
  • 打赏
  • 举报
回复

Response.ContentType = "application/x-msdownload ; Charset=utf-8";
Response.AddHeader("Content-Disposition", "attachment; filename=...");
za1mb2yc3 2005-11-13
  • 打赏
  • 举报
回复
保存为文件好像格式也不对,我是通过乱麻看得,一回我再用ultraedit看看
za1mb2yc3 2005-11-13
  • 打赏
  • 举报
回复
我已经写了呀
za1mb2yc3 2005-11-13
  • 打赏
  • 举报
回复
Response.ContentType = "image/*"
jspadmin 2005-11-13
  • 打赏
  • 举报
回复
showimg.asp
<%
Response.ContentType="image/*"
Response.BinaryWrite rs("ole").getChunk(8000000)
%>
<img src="showimg.asp?id=<%=id%>">
显示图片必须设置contenttype
-----------------------------------------------------------------------------
欢迎光临我的小站http://www.pifoo.com 有什么问题可以给我留言http://www.pifoo.com/guestbook/ 我的QQ:33323489

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧