图片的二进制代码入数据库并在网页上显示(新手篇)

最新推荐文章于 2024-07-13 18:10:19 发布

aa2004

最新推荐文章于 2024-07-13 18:10:19 发布

阅读量1.1k

点赞数

分类专栏： Asp学习文章标签：数据库 sql javascript file input upload

本文链接：https://blog.csdn.net/aa2004/article/details/177831

版权

Asp学习专栏收录该内容

2 篇文章 0 订阅

订阅专栏

conn.asp-----------数据库连接文件
index.asp-----------上传表单及显示已经上传的数据
showing.asp-------显示数据库图片的数据
upload.asp---------保存图片的数据,寸入数据库
del.asp--------------删除图片

data.mdb(picture表)
字段                            类型
id                                  自动编号
img                                OLE对象

index.asp


<html>
<body>
<center>
<form name=mainform enctype="multipart/form-data" action="upload.asp" method="post">
<input type=file name="file1">
<input type=submit name="ok" value="确定">
</form>
<%
set rs=server.createobject("adodb.recordset")
sql="select * from picture order by id desc"
rs.open sql,conn,1,1
do while not rs.eof
%>
<img src="showing.asp?id=<%=rs("id")%>" width="280" Border=0>
<a href="del.asp?id=<%=rs("id")%>">删除</a>
<br>
<%
rs.movenext
loop
%>
</center>
</body>
</html>
<center>
</body>
</html>
<%
rs.close
set rs=nothing
set conn=nothing
%>

conn.asp

<%
set conn=server.createobject("adodb.connection")
connstr="provider=microsoft.jet.oledb.4.0;data source="&server.mappath("data.mdb")
conn.open connstr
%>

showing.asp


<%
set rs=server.createobject("adodb.recordset")
sql="select * from picture where id="&trim(request("id"))
rs.open sql,conn,1,1

response.contenttype = "image/*"
response.binaryWrite rs("img").getChunk(7500000)
rs.close
set rs=nothing
set conn=nothing
%>

upload.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 rs=server.createobject("adodb.recordset")
sql="select * from picture where id is null"
rs.open sql,conn,1,3

rs.addnew
rs("img").appendchunk mydata
rs.update
rs.close
set rs=nothing
set conn=nothing
response.write"<script language='javascript'>"
response.write"alert('upload successed！');"
response.write"window.location='index.asp';"
response.write"</script>"
%>

del.asp


<%
sql="delete * from picture where id="&request("id")
conn.execute sql
response.write"<script language='javascript'>"
response.write"alert('del successed！');"
response.write"window.location='index.asp';"
response.write"</script>"
%>

aa2004

关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
1
评论
图片的二进制代码入数据库并在网页上显示(新手篇)

conn.asp-----------数据库连接文件index.asp-----------上传表单及显示已经上传的数据showing.asp-------显示数据库图片的数据upload.asp---------保存图片的数据,寸入数据库del.asp--------------删除图片data.mdb(picture表)字段
复制链接

扫一扫