ASP + ACCESS 上傳圖片到數據庫與將圖片讀出數據庫顯示之實(shí)現(詳細版)
一般的無(wú)組件上傳類(lèi),其上傳過(guò)程是將圖片先保存到指定文件夾,與此同時(shí)將該路徑保存至數據庫字段的。顯示圖片則是根據數據庫表中的路徑字段對應顯示的。當然有關(guān)圖片的管理,比如刪除:只刪除了路徑,實(shí)際的圖片需要根據該路徑通過(guò)FSO進(jìn)行刪除……那有沒(méi)有這樣一種情況:將圖片直接作為一個(gè)字段的值保存。對圖片的操作就象是對數據字段的操作一樣熟練。答案是肯定的,只是將該字段的類(lèi)型設為OLE對象
知識點(diǎn):OLE 對象字段用來(lái)存儲諸如 Microsoft Word 或 Microsoft EXCEL 文檔、圖片、聲音的數據以及在別的程序中創(chuàng )建的其他類(lèi)型的二進(jìn)制數據。OLE 對象可以鏈接或嵌入到 Microsoft Access 表的字段中。
一、設計數據庫testimg.mdb
為方便調試,設計表imgurl,其中兩個(gè)字段:id(自動(dòng)編號、關(guān)鍵字)、img(OLE 對象)
二、連接數據庫文件conn.asp
<%
db_path="testimg.mdb"
set conn=server.CreateObject("ADODB.connection")
connstr="driver={Microsoft Access Driver (*.mdb)};dbq="&server.MapPath(db_path)
conn.open connstr
%>
三、提供上傳圖片的表單頁(yè)面upload.html
<form action="upload.asp" method="post" enctype="multipart/form-data">
<input type="file" name="imgurl">
<input type="submit" name=ok value="ok">
</form>
四、接受數據并添加記錄頁(yè)upload.asp
<!--#include file="conn.asp"-->
<%
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")
rs.open "SELECT * FROM imgurl",conn,3,3
rs.addnew
rs("img").AppendChunk myData
rs.update
rs.close
set rs=nothing
set conn=nothing
response.redirect "index.asp"
%>
五、提取數據庫表中圖片字段內容以做顯示圖片頁(yè)showimg.asp
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("ADODB.recordset")
sql="select * from imgurl where id="&trim(request("id"))
rs.open sql,conn,1,1
Response.ContentType="image/*"
Response.BinaryWrite rs("img").getChunk(8000000)
rs.close
set rs=nothing
set conn=nothing
%>
六、顯示圖片的index.asp
<!--#include file="conn.asp"-->
<%
strsql="select * from imgurl"
set rs=server.createobject("ADODB.recordset")
rs.open strsql,conn,1,1
do until rs.eof
whatid=rs("id")
%>
<img src="showimg.asp?id=<%=whatid%>">
<%
rs.movenext
loop
%>