上傳 摘要：在基於瀏覽器/伺服器的應用環境中，在瀏覽器中上傳各種類型的檔案一直是困擾使用者檔案管理應用的難題之一。在HTTP中上傳檔案有三種機制：RFC1867，PUT和WebDAV。常用的實現方法是利用在RFC1867中引入的一個新類型：File以及ADO Stream對象。本文對上述上傳方法及實現原理作了論述，並給出了具體解決執行個體。
關鍵詞：ASP 組件 FILE對象
當前，基於瀏覽器/伺服器模式的應用比較流行。當使用者需要將檔案傳輸到伺服器上時，常用方法之一是運行FTP伺服器並將每個使用者的FTP預設目錄設為使用者的Web主目錄，這樣使用者就能運行FTP客戶程式並上傳檔案到指定的 Web目錄。這就要求使用者必須懂得如何使用FTP客戶程式。因此，這種解決方案僅對熟悉FTP且富有經驗的使用者來說是可行的。 如果我們能把檔案上傳功能與Web整合，使使用者僅用Web瀏覽器就能完成上傳任務，這對於他們來說將是非常方便的。但是，一直以來,由於File System Object的僅能傳送文字檔的局限，所以ASP最大的難題就是檔案上傳問題。下面介紹的就是如何在基於HTTP協議的網頁中實現檔案的上傳。
一．通過HTTP上傳的三種機制
通過HTTP上傳有三種機制：RFC1867, PUT 和 WebDAV。
PUT 是在HTTP 1.1引入了一個新的HTTP動詞。當web伺服器收到一個HTTP PUT和對象名字，它將會驗證使用者，接收HTTP流的內容，並把它直接存入web伺服器。由於這可能會對一個web網站造成破壞，並且還會失去HTTP最大的優勢：伺服器可程式化性。在PUT的情況下，伺服器自己處理請求：沒有空間讓CGI或者ASP應用程式介入。唯一讓你的應用程式捕獲PUT的方法是在低層操作，ISAPI過濾層。由於相應的原因，PUT的應用很有限。
而WebDAV允許web內容的分布式認證與翻譯。它引入了幾種新的HTTP動詞，允許通過HTTP上傳，鎖定/解鎖，登記/檢驗web內容。Office 2000中的"Save to web" 就是通過WebDAV來實現的。如果你所感興趣的一切都是上傳內容，WebDAV應用得非常出色，它解決了很多問題。 然而，如果你需要在你的web應用程式裡面上傳檔案，WebDAV對你就毫無用處可言。象HTTP PUT一樣，那些WebDAV的動詞是被伺服器解釋的，而不是web應用程式。你需要工作在ISAPI過濾層來訪問WebDAV的這些動詞，並在你的應用程式中解釋內容。
RFC1867 (http://www.ietf.org/rfc/rfc1867.txt) 最終被W3C在HTML3.2中接受前，是作為一種建議標準。它是一種非常簡單但是功能很強大的想法：在表單欄位中定義一個新類型。
<INPUT TYPE="FILE">
並且在表單本身加入了不同的編碼方案，不再使用典型的：
<FORM ACTION="formproc.asp" METHOD="POST">
而是使用：
<FORM ACTION="formproc.asp" METHOD="POST" ENCTYPE="multipart/form-data">
這種編碼方案在傳送大量資料的時候，比起預設的"application/x-url-encoded"表單編碼方案，顯得效率要高得多。URL編碼只有很有限的字元集，使用任何超出字元集的字元，必須用'%nn'代替，這裡的nn表示相應的2個十六進位數字。例如，即使是普通的空白字元也要用'%20'代替。而RFC1867使用多部分MIME編碼，就象通常在e-mail訊息中看到的那樣，不編碼來傳送大量資料，而只是在資料周圍加上很少的簡單但實用的頭部。主要瀏覽器的廠商都採用了建議的"瀏覽..."按鈕，使用者能很容易的使用本地"開啟檔案..." 對話方塊選擇要上傳的檔案。
RFC1867仍然將大多數檔案上傳的靈活方法留給了你的web應用程式。PUT用得很有限。WebDAV對內容的作者很有用，比如FrontPage使用者，但是對想在web應用程式中加入檔案上傳的web開發人員來說很少用到。因此，RFC1867是在web應用程式中加入檔案上傳的最好的辦法。
在實際應用中，微軟免費提供了Posting Acceptor 。ASP不懂"multipart/form-data" 編碼方案。取而代之，微軟提供了Posting Acceptor ，Posting Acceptor是一種在上傳完成後，接受REPOST到一個ASP頁的ISAPI應用程式。
Software Artisans的SA-FileUp是最早的商業Active Server組件之一。幾經改進，現在作為一個純粹的ASP組件存在。
二．基於ASP的檔案上傳實現原理分析
基本原理是：採用ADO Stream對象的BinaryRead方法將FORM中的所有資料讀出，從中截取出所需的檔案資料，以二進位檔案方式存檔。
下面是上傳檔案頁面的一個例子（upload.htm）：
<html>
<body>
<form name="Upload" Method="Post" Enctype="multipart/form-data" Action="Upload.asp">
<input type="file" name="FileName">
<INPUT TYPE="Submit" VALUE="Upload"></TD>
</form>
</body>
</html>
程式中使用了檔案對象，這樣在Upload.asp中採用BinaryRead方法讀來的未經處理資料就不僅僅是選擇的檔案本身的資料，還包含該檔案在使用者硬碟上的路徑、類型、提交頁面的表單網域名稱等相關資訊的描述，這樣我們就需從中提取出檔案的具體內容。根據分析，資料的頭部資訊與資料的分界線是兩對斷行符號分行符號，尾部也有分隔資訊，我們可以採用類似以下的方法擷取檔案資料。
Dim FormData.FormSize,DataStart,CLStr，DivStr
FormSize=Request.TotalBytes
FormData=Request.BinaryRead(FormSize)
CLStr=ChrB(13)&ChrB(10)
DataStart=InStrB(FormData.CLStr&CLStr)+4
'4是兩對斷行符號分行符號的長度
DivStr=LeftB(FormData,InStrB(FormData,CLStr)-1)
DataSize=InStrB(DataStart+1,FormData,DivStr)-DataStart-2
FormData=MidB(FormData,DataStart,DataSize)
FormData就是檔案的內容了。
中間根據需要，可進行相應的處理。最後的工作就是將檔案儲存了。儲存的方法可以有兩種：一種是利用VB或VC之類程式中的二進位檔案操作方法，在工程中加入適當的類型庫，最終編譯成DLL檔案，使用時再將該DLL檔案註冊就可以了。檔案存貯程式如下：
Public Function SaveFile(Pathname As String) As String
Dim objContext As ObjectContext
Dim objRequest As Request
Set objContext=GetObjectContext()
Set objRequest=objContext("Request")
'以下的一段代碼是進行檔案存貯的有關操作
Dim FormData() As Byte,CLStr,DivStr
Dim DataStart As Long,DataSize As Long
DataSize=objRequest.TotalBytes
Redim FormData(DataSize-1)
FormData=objRequest.BinaryRead(DataSize)
CLStr=ChrB(13) & ChrB(10)
DataStart=InStrB(FormData,CLStr & CLStr)+4
DivStr=LeftB(FormData,InStrB(FormData,CLStr)-1)
DataSize=InStrB(DataStart+1,FormData,DivStr)-DataStart-2
FormData=MidB(FormData,DataStart,DataSize)
'建立一個二進位檔案並將FormData寫入其中
Open Pathname For Binary As 1
Put #1,,FormData
Close #1
SaveFile="OK!"
End Function
第二種方法是利用ADO STREAM中提供的二進位檔案操作方法來完成，儲存檔案的語句是： StreamOBJ.SaveToFile (fileName,2)。在 這種操作中，我們可以將有關的操作存放在一個類檔案中，在應用時，直接將該類檔案包含在ASP程式中就可以了。具體處理方法，請參閱有關介紹。
三．檔案上傳實現方法執行個體
實現檔案上傳可使用組件或無組件方式。對於組件類，比如說microsoft posting acceptor（簡稱mpa），就是微軟公司發布的一
