ASP实现表单大容量数据的提交方法

　<SCRIPT language=javascript>
　　file://数据拆分，并放到相应的hidden域中，在Form的onSubmit事件中激发
　　function fnPreHandle()
　　{
　　var iCount; file://拆分为多少个域
　　var strData; file://原始数据
　　var iMaxChars = 50000;//考虑到汉字为双字节，域的最大字符数限制为50K
　　var iBottleNeck = 2000000;//如果文章超过2M字，需要提示用户
　　var strHTML;//原始数据
　　strData = frmTest.BigField.value;//如果文章实在太长，需要提醒用户
　　if (strData.length > iBottleNeck)
　　{
　　if (confirm("您要发布的文章太长，建议您拆分为几部分分别发布。\n如果您坚持提交，注意需要较长时间才能提交成功。\n\n是否坚持提交？") == false)
　　return false;
　　}iCount = parseInt(strData.length / iMaxChars) + 1;//hdnCount记录原数据域拆分为多少个子域
　　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)内动态插入各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);
　　}//原数据域清空
　　frmTest.BigField.value = "";
　　}
　　</SCRIPT>

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