逐步講解向Access數(shù)據(jù)庫(kù)上傳且顯示圖片

字號(hào):

本文從多個(gè)角度來(lái)講解如何在Access數(shù)據(jù)庫(kù)上如何上傳并且顯示上所上傳圖片。
    在動(dòng)態(tài)網(wǎng)站制做過(guò)程中,需要上傳圖片、顯示圖片,上傳的圖片要能夠保存在數(shù)據(jù)庫(kù)中,一般小型網(wǎng)站只支持Access數(shù)據(jù)庫(kù),如何上傳圖片,將其保存在數(shù)據(jù)庫(kù)中并將其顯示出來(lái),是數(shù)據(jù)庫(kù)+ASP應(yīng)用技術(shù)之一。許多書籍只介紹了SQL數(shù)據(jù)庫(kù)的方法,而對(duì)Access卻很少提及。網(wǎng)上有不少關(guān)于Access數(shù)據(jù)庫(kù)上傳圖片、顯示圖片的文章,多數(shù)文章介紹的不夠全面,有些程序根本就不能開通,對(duì)于初學(xué)者來(lái)說(shuō)很難把握,我通過(guò)參考一些文章,向初學(xué)者提供一套比較完整的程序,較全面地介紹了利用上傳向Access數(shù)據(jù)庫(kù)添加圖片、顯示圖片,希望我們這些初學(xué)的同志少走一些彎路。
    第一步、要制做一個(gè)Access數(shù)據(jù)庫(kù),我們給它起名字叫images.mdb,該數(shù)據(jù)庫(kù)里有兩個(gè)字段:id、img,id字段的類型設(shè)為自動(dòng)編號(hào),img字段的類型設(shè)為OLE對(duì)象。
    第二步、設(shè)計(jì)一個(gè)上傳的表單,根據(jù)要求可簡(jiǎn)可繁。
    第三步、設(shè)計(jì)后臺(tái)的圖片處理程序,可分為圖片上傳保存程序和圖片讀取程序。
    第四步、圖片顯示。
    下面給出程序并分別做介紹。
    一、 表單程序updata.html
    它的功能是為上傳提供一個(gè)界面,表單的enctype屬性為multipart/form-data,它是設(shè)置表單的MIME編碼的,只有使用了它才能完整地傳送文件的數(shù)據(jù)。
    <html>
    <body>
    <center>
    <form name="mainForm" enctype="multipart/form-data"action="process.asp" method="post">
    <input type=file name=mefile>
    <input type=submit name=ok value="上傳">
    </form>
    </center>
    </body>
    </html>
    二、 圖片的上傳與保存程序process.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 connGraph=server.CreateObject("ADODB.connection")
    connGraph.Open "Provider=Microsoft.Jet.OLEDB.4.0;
    Data Source=" & server.MapPath("images.mdb")
    set rec=server.createobject("ADODB.recordset")
    rec.Open "SELECT * FROM images where id is null",connGraph,1,3
    rec.addnew
    rec("img").appendchunk mydata
    rec.update
    rec.closes
    set rec=nothing
    set connGraph=nothing %>
    這段程序的功能是將上傳圖片的數(shù)據(jù)保存到數(shù)據(jù)庫(kù)里。下面分句說(shuō)明各語(yǔ)句的作用。
    response.buffer=true
    formsize=request.totalbytes
    formdata=request.binaryread(formsize)
       打開緩存功能,獲取客戶端總的發(fā)送數(shù)據(jù)量,獲取上傳過(guò)來(lái)的數(shù)據(jù)。
    bncrlf=chrB(13) & chrB(10)
    divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1)
    這兩個(gè)語(yǔ)句的意思是設(shè)一個(gè)二進(jìn)制回車符及得到一個(gè)divider分隔符,目的是為了確定圖片的位置。
    datastart=instrb(formdata,bncrlf & bncrlf)+4
    dataend=instrb(datastart+1,formdata,divider)-datastart
    mydata=midb(formdata,datastart,dataend)
       以上三個(gè)語(yǔ)句是確定圖片數(shù)據(jù)的起始位置、結(jié)束位置及實(shí)際圖片的數(shù)據(jù)。
    set connGraph=server.CreateObject("ADODB.connection")
    connGraph.Open "Provider=Microsoft.Jet.OLEDB.4.0;
    Data Source=" & server.MapPath("images.mdb")
       創(chuàng)建connection對(duì)象,并連接Microsoft Access數(shù)據(jù)庫(kù)。
    set rec=server.createobject("ADODB.recordset")
    rec.Open "SELECT * FROM images where id is null",connGraph,1,3
    rec.addnew
    rec("img").appendchunk mydata