如何显示数据库里面的图片

maoguoqing 2004-11-11 05:44:28
我的数据库是access 存放图片的字段是ole数据类型,在页面里用
Response.BinaryWrite rs("p_content") 显示的是乱码,如何能正确显示图片并可以控制她的长度和宽度在一个固定的尺寸内,请给出列子代码

谢谢
...全文
253 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
hacker18 2004-11-13
  • 打赏
  • 举报
回复
已收藏!
谢谢!
shunu 2004-11-11
  • 打赏
  • 举报
回复
收藏点.......
aa2004 2004-11-11
  • 打赏
  • 举报
回复
http://blog.csdn.net/aa2004/archive/2004/11/11/177831.aspx
控制图片大小用<img>
sdts 2004-11-11
  • 打赏
  • 举报
回复
楼上的说得对
hzgarrison 2004-11-11
  • 打赏
  • 举报
回复
<%
set connGraph=server.CreateObject("ADODB.connection")
connGraph.ConnectionString="driver={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("data/images.mdb") & ";uid=;PWD=;"
connGraph.Open

set rec=server.createobject("ADODB.recordset")
if trim(request("userid"))<>"" then
strsql="select img from images where uid='" & trim(request("userid")) & "'"
else
strsql="select img from images where uid='" & trim(session("userid")) & "'"
end if
rec.open strsql,connGraph,1,1
if not rec.eof then
Response.ContentType = "image/gif"
Response.BinaryWrite rec("img").getChunk(7500000)
rec.close
set rec=nothing
set connGraph=nothing
else
rec.close
set rec=nothing
set connGraph=nothing
if trim(session("userid"))=trim(request("userid")) then
response.redirect "images/noimg.bmp"
else
response.redirect "images/notupload.jpg"
end if
end if
%>

28,391

社区成员

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

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