作者：追風
用ASP編寫網站應用程式時間長了，難免會遇到各式各樣的問題，其中關於如何上傳檔案到伺服器恐怕是遇見最多的問題了，尤其是上傳圖片，例如你想要在自己的社群裡面實現類似網易虛擬社群提供的「每日一顆星」的功能，就要提供給網友上傳照片的功能。上傳圖片檔案到伺服器可以使用各種免費的檔案上傳元件，使用起來功能雖然很強大，但是由於很多情況下，我們只能使用免費的支援ＡＳＰ的空間或租用別人的虛擬空間，對於第一種情況，我們根本就沒有可能來使用文件上傳元件；至於第二種情況，我們也要付出不少的「銀子」才可以。除非你擁有自己的虛擬主機，你就可以隨便的在伺服器上面安裝自己所需的元件，這種情況對大多數人來說是可望而不可及的。那我們就沒有辦法了嗎？呵呵，答案是肯定的（當然是肯定的了，要不然我也沒辦法寫出這篇文章啊）。下面就讓我們一起來使用純ＡＳＰ程式碼來實現圖片的上傳以及儲存到資料庫的功能（順便也實作顯示資料庫中的圖片到網頁上的功能）。
首先我們先來熟悉一下將要使用的物件方法。我們用來取得上一個頁面傳遞過來的資料一般是使用Request物件。同樣的，我們也可以使用Request物件來取得上傳上來的檔案數據，使用的方法是Request.BinaryRead()。而我們要從資料庫讀出來圖片的資料顯示到網頁上面要用到的方法是：
Request.BinaryWrite()。在我們得到了圖片的數據，要保存到資料庫中的時候，不可以直接使用Insert語句對資料庫進行操作，而是要使用ADO的AppendChunk方法，同樣的，讀出資料庫中的圖片數據，要使用GetChunk方法。各個方法的具體語法如下：
*Request.BinaryRead語法：
variant=Request.BinaryRead(count)
參數
variant
返回值保存著從客戶端讀取到資料。
count
指明要從客戶端讀取的資料量大小，這個值小於或等於使用方法Request.TotalBytes得到的資料量。
*Request.BinaryWrite語法：
Request.BinaryWritedata
參數
data
要寫入到客戶端瀏覽器中的資料包。
*Request.TotalBytes語法：
variant=Request.TotalBytes
參數
variant
傳回從客戶端讀取到資料量的位元組數。
*AppendChunk語法將資料追加到大型文字、二進位資料Field或Parameter物件。
object.AppendChunkData
參數
objectField或Parameter對象
Data變體型，包含追加到物件中的資料。
說明使用Field或Parameter物件的AppendChunk方法可將長二進位或字元資料填寫至物件中。在系統記憶體有限的情況下，可以使用AppendChunk方法對長整數值進行部分而非全部的操作。
*GetChunk語法傳回大型文字或二進位資料Field物件的全部或部分內容。
variable=field.GetChunk(Size)
傳回值傳回變體型。
參數
Size長整型表達式，等於要檢索的位元組或字元數。
說明使用Field物件的GetChunk方法檢索其部分或全部長二進位或字元資料。在系統記憶體有限的情況下，可使用GetChunk方法處理部分而非全部的長整數值。
GetChunk呼叫傳回的資料將賦給「變數」。如果Size大於剩餘的數據，則
GetChunk僅傳回剩餘的資料而無需用空白填入「變數」。如果欄位為空，則
GetChunk方法傳回Null。
每個後續的GetChunk呼叫將檢索從前一次GetChunk呼叫停止處開始的資料。但是，如果從一個欄位檢索資料然後在目前記錄中設定或讀取另一個欄位的值，ADO將認為已從第一個欄位中擷取資料。如果在第一個欄位上再次呼叫GetChunk方法，ADO將把呼叫解釋為新的GetChunk操作並從記錄的起始處開始讀取。如果其他Recordset物件不是首個Recordset物件的副本，則存取其中的欄位不會破壞GetChunk操作。
如果Field物件的Attributes屬性中的adFldLong位元設定為True，則可以對該欄位使用GetChunk方法。
如果在Field物件上使用Getchunk方法時沒有目前記錄，將產生錯誤3021（無目前記錄）。
接下來，我們就要來設計我們的資料庫了，作為測試我們的資料庫結構如下（access2000）：
欄位名稱類型描述id 自動編號主鍵值
img OLE物件用來保存圖片數據
對於在MSSQLServer7中，對應的結構如下：
欄位名稱類型描述id int(Identity) 主鍵值
img image 用來保存圖片數據
現在開始正式編寫我們的純ＡＳＰ程式碼上傳部分了，首先，我們有一個提供給使用者的上傳介面，可以讓使用者選擇要上傳的圖片。程式碼如下（upload.htm）：
<html>
<body>
<center>
<form name="mainForm" enctype="multipart/form-data" action="process.asp" method=post>
<inputtype=filename=mefile><br>
<inputtype=submitname=okvalue="OK">
</form>
</center>
</body>
</html>
注意enctype="multipart/form-data"，一定要在Form中有這個屬性，否則，將無法得到上傳上來的資料。接下來，我們要在process.asp中對從瀏覽器中獲取的數據進行必要的處理，因為我們在process.asp中獲取到的數據不僅僅包含了我們想要的上傳上來的圖片的數據，也包含了其他的無用的信息，我們需要剔除冗餘數據，並將處理過的圖片數據保存到資料庫中，這裡我們以access2000為例。具體程式碼如下（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)
setconnGraph=server.CreateObject("ADODB.connection")
connGraph.ConnectionString="driver={MicrosoftAccessDriver(*.mdb)};DBQ="&server.MapPath("images.mdb")&";uid=;PWD=;"
connGraph.Open
setrec=server.createobject("ADODB.recordset")
rec.Open"SELECT*FROM[images]whereidisnull",connGraph,1,3
rec.addnew
rec("img").appendchunkmydata
rec.update
rec.close
setrec=nothing
setconnGraph=nothing
%>
好了，這下我們就把上傳來的圖片儲存到了名為images.mdb的資料庫中了，剩下的工作就是要將資料庫中的圖片資料顯示到網頁上面了。一般在ＨＴＭＬ中，顯示圖片都是使用<IMG>標籤，也就是<IMGSRC="圖片路徑">，但是我們的圖片是保存到了資料庫中，「圖片路徑」是什麼呢？呵呵，其實這個SRC屬性除了指定路徑外，也可以這樣使用：
<IMGSRC="showimg.asp?id=xxx">
所以，我們要做的就是在showimg.asp中從資料庫中讀出來符合條件的數據，並返回到SRC屬性中就可以了，具體程式碼如下（showimg.asp）：
<%
setconnGraph=server.CreateObject("ADODB.connection")
connGraph.ConnectionString="driver={MicrosoftAccessDriver(*.mdb)};DBQ="&
server.MapPath("images.mdb")&";uid=;PWD=;"
connGraph.Open
setrec=server.createobject("ADODB.recordset")
strsql="selectimgfromimageswhereid="&trim(request("id"))
rec.openstrsql,connGraph,1,1
Response.ContentType="image/*"
Response.BinaryWriterec("img").getChunk(7500000)
rec.close
setrec=nothing
setconnGraph=nothing
%>
注意在輸出到瀏覽器之前一定要指定Response.ContentType="image/*"，
以便正常顯示圖片。
最後要注意的地方是，我的process.asp中作的處理沒有考慮到第一頁(upload.htm)中還有其他數據，例如<INPUT type=tesxt name=userid>等等，如果有這些項目，你的process.asp就要注意處理掉不必要的資料。