如何把数据库里的image字段里的内容根据扩展名还原显示？(100不够在给)在线等待

zhangr4 2004-05-05 02:42:25

如何把数据库里的image字段里的内容根据扩展名还原显示？
如
表：“Demo”
字段：value 类型 image

type 类型 char(5)

数据：value(二进制文件) type（扩展名为 "DOC")
value(二进制文件) type（扩展名为 "jpg")

等……
字段里的二进制内容根据扩展名还原显示在IE页面里谢谢。

...全文

37 4 打赏收藏转发到动态举报

写回复

用AI写文章

4 条回复

切换为时间正序

请发表友善的回复…

发表回复

xieyj 2004-05-06

打赏
举报

不需要组件如何把图片上传到数据库中并显示出来？

代码：
upload.htm
' 上传页面
<html>
<body>
<center>

　　 <form name="mainform" enctype="multipart/form-data" action="get.asp" method=post>
　　 <input type=file name=mefile><br>
　　 <input type=submit name=ok value="上传">
　　 </form>
</center>
</body>
</html>

get.asp
' 处理浏览器中送来的数据
<%
response.buffer=true
formsize=request.totalbytes
formdata=request.binaryread(formsize)
bncrlf=chrb(13) & chrb(10)
divider=leftb(formdata,clng(instrb(formdata,bncrlf))-1)
datastart=instrb(formdata,bncrlf & bncrlf)+4
dataend=instrb(datastart+1,formdata,divider)-datastart
mydata=midb(formdata,datastart,dataend)

set conn=server.createobject("adodb.connection")
conn.connectionstring="driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("images.mdb")
conn.open

set rs=server.createobject("adodb.recordset")
rs.open "select * from [images] where id is null",conn,1,3
rs.addnew
rs("img").appendchunk mydata
rs.update
rs.close
set rs=nothing
set conn=nothing
%>

showimg.asp
' 显示图片
<%
set conn=server.createobject("adodb.connection")
conn.connectionstring="driver={microsoft access driver (*.mdb)}; dbq=" & server.mappath("images.mdb")
conn.open
set rs=server.createobject("adodb.recordset")
strsql="select img from images where id=" & trim(request("id"))
rs.open strsql,conn,1,1
response.contenttype = "image/*"
' 在输出到浏览器之前一定要指定response.contenttype = "image/*",以便正常显示图片
response.binarywrite rec("img").getchunk(7500000)
rs.close
set rs=nothing
set conn=nothing
%>

数据库结构如下：
Access：
序号字段名称类型描述
1 id 自动编号主键值
2 img ole对象用来保存图片数据
　　　　　　　　
MS Sql Server：
序号字段名称类型描述
1 id int(identity) 主键值
2 img image 用来保存图片数据

sfply 2004-05-05