首先，你的表單的類(lèi)型設(shè)為 <FORM ENCTYPE="multipart/form-data"
     ACTION="uploadresult.asp" METHOD=POST>
     
     Please choose a picture to upload:
     <INPUT NAME="picture" TYPE=FILE ACCEPT="image/*">
     <input name="text1" type=text >
     </form>
     然后在下一頁(yè)，用分離的辦法先分出文本，此時(shí)不能用request.form，應(yīng)變?yōu)?br>     FormData = Request.BinaryRead( FormSize )
     
     FormSize = Request.TotalBytes
     bnCRLF = chrB( 13 ) & chrB( 10 )
     Divider = LEFTB( FormData, INSTRB( FormData, bnCRLF ) - 1 )
     DataStart = INSTRB( FormData, bnCRLF & bnCRLF ) + 4
     DataEnd = INSTRB( DataStart + 1, FormData, divider ) - DataStart
     Response.ContentType = "image/gif"
     Response.BinaryWrite MIDB( FormData, DataStart, DataEnd )
     
     這里先分出的是圖像
     然后在將其二進(jìn)制轉(zhuǎn)換為文本。
     求出大小。
     
     FormSize = Request.TotalBytes
     之后用總大小減去剛才求出的大小。得出文本大小。然后用字符串函數(shù)得出其值。
     最后分別存在數(shù)據(jù)庫(kù)中。
     
     注意，此方法不能完成另存為文件。因?yàn)閂bscript中的文件對(duì)象不能處理二進(jìn)制格式。（圖象事二進(jìn)制的）
     但Vb中可以，所以我們可已利用組件完成以上工作。
     我自己使用自己編寫(xiě)的組件，這樣即可以完成存為數(shù)據(jù)庫(kù)，又可以存位文件。還可以限制大小，文件類(lèi)型（gif，jpg，Htm，exe）等等，但具體思路代碼仍是上面的代碼。如果需要可以和我聯(lián)系。