快捷導(dǎo)航

Form Post提交容量大的數(shù)據(jù)

更新時間：2009年06月01日 21:22:17 作者：

以前在工作中遇到一個問題，當(dāng)表單發(fā)送的數(shù)據(jù)量很大時，就會報錯。查閱MSDN了解到，原因是微軟對用Request.Form()可接收的最大數(shù)據(jù)限制為100K字節(jié)。

微軟建議用Request.BinaryRead()讀取表單數(shù)據(jù)，但由于這種方法讀出的是二進(jìn)制數(shù)據(jù)，需要對讀出的數(shù)據(jù)逐字節(jié)進(jìn)行分析，生成有意義的字符串（MSDN上的一段程序就是這樣寫的，但它并沒有考慮諸如標(biāo)點(diǎn)符號等轉(zhuǎn)義字符需要進(jìn)行特殊分析）。如果說這種方法對于純英文系統(tǒng)勉強(qiáng)可用的話，則對于中文系統(tǒng)來說就有極大的麻煩，因?yàn)闈h字是用兩個字節(jié)表示的，而讀出的二進(jìn)制數(shù)據(jù)本身并不能判斷是英文還是漢字（否則就不是二進(jìn)制數(shù)據(jù)，而是字符串了^-^）。這樣的話就必須了解漢字的編碼規(guī)律才能進(jìn)行分析。最后，即使算法上能把這些都分析出來，大家想想對于一個MB級的巨型字符串逐字節(jié)進(jìn)行分析，其效率何如？所以，此路不通！
　　不過，辦法總是有的。一開始我以為是整個表單數(shù)據(jù)的總和不能超過100KB，后來發(fā)現(xiàn)這是對表單內(nèi)每個域的限制。問題的解決辦法是，對于一個需要發(fā)送大數(shù)據(jù)的域，在提交表單前將數(shù)據(jù)拆分為小于限額的數(shù)份，分別放在數(shù)個hidden域中，同時把原有域清空，再正式提交表單。服務(wù)器端還是用Request.Form()讀取各hidden域的數(shù)據(jù)，再按照順序把他們拼接起來就行了。主要代碼如下：
　　注意：需要在Form中的HTML代碼內(nèi)指定一個DIV,以便向其中動態(tài)插入hidden域。
　　====客戶端示例代碼====
　　

復(fù)制代碼代碼如下:

<SCRIPT language=javascript> 
　　//數(shù)據(jù)拆分，并放到相應(yīng)的hidden域中，在Form的onSubmit事件中激發(fā) 
　　function fnPreHandle() 
　　{ 
　　var iCount; //拆分為多少個域 
　　var strData; //原始數(shù)據(jù) 
　　var iMaxChars = 50000;//考慮到漢字為雙字節(jié)，域的最大字符數(shù)限制為50K 
　　var iBottleNeck = 2000000;//如果文章超過2M字，需要提示用戶 
　　var strHTML;//原始數(shù)據(jù) 
　　strData = frmTest.BigField.value;//如果文章實(shí)在太長，需要提醒用戶 
　　if (strData.length > iBottleNeck) 
　　{ 
　　if (confirm("您要發(fā)布的文章太長，建議您拆分為幾部分分別發(fā)布。\n如果您堅(jiān)持提交，注意需要較長時間才能提交成功。\n\n是否堅(jiān)持提交？") == false) 
　　return false; 
　　}iCount = parseInt(strData.length / iMaxChars) + 1;//hdnCount記錄原數(shù)據(jù)域拆分為多少個子域 
　　strHTML = "<input type=hidden name=hdnCount value=" + iCount + ">";//生成各子域的HTML代碼 
　　for (var i = 1; i <= iCount; i++) 
　　{ 
　　strHTML = strHTML + "\n" + "<input type=hidden name=hdnBigField" + i + ">"; 
　　}//在Form中DIV(divHidden)內(nèi)動態(tài)插入各hidden域的HTML代碼 
　　document.all.divHidden.innerHTML = strHTML;//給各子域賦值 
　　for (var i = 1; i <= iCount; i++) 
　　{ 
　　frmTest.elements["hdnBigField" + i].value = strData.substring((i - 1) * iMaxChars, i * iMaxChars); 
　　}//原數(shù)據(jù)域清空 
　　frmTest.BigField.value = ""; 
　　} 
　　</SCRIPT> 

　　====服務(wù)器端示例代碼====
　　

復(fù)制代碼代碼如下:

<% 
　　Dim strData 
　　Dim intFieldCount 
　　Dim iintFieldCount = Request.Form("hdnCount")For i=1 To intFieldCount 
　　strData = strData & Request.Form("hdnBigfield" & i) 
　　NextResponse.Write strData 
　　%>