当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp下对POST提交数据限制的解决方法

ASP
asp实现取得数组中的最大值的代码
asp 将日期格式化为需要的格式
asp 下产生任意位数随机密码的代码
asp下返回以千分位显示数字格式化的数值
asp重定向页面的方法总结
asp下去除数组中重复的项的方法
asp下实现 重新排序数字数组的代码
asp 验证输入网址是否有效并可以访问 与正则验证输入网址
asp验证Ip格式的函数
asp实现生成由数字,大写字母,小写字母指定位数的随机数
asp 格式化sql中的like字符串
asp 实现显示所有的服务器变量值的函数
asp 取得用户真实IP,对代理地址仍然有效的函数
asp 通用数据库连接过程函数
asp 字符串截取函数
asp下实现格式化文件大小以MB显示的函数
asp 下用正则表达式检测邮箱格式的函数
asp 实现检测字符串是否为纯字母和数字组合的函数
asp代码实现检测组件是否安装的函数
asp通过JMAIL实现通用发送函数

ASP 中的 asp下对POST提交数据限制的解决方法


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 106 ::
收藏到网摘: n/a

由于微软对POST提交数据的大小进行了限制,当表单发送的数据量很大时,就会报错(错误 "ASP 0107 : 80004005")。原因是微软对用Request.Form()可接收的最大数据限制为100K字节。 问题的解决办法是,对于一个需要发送大数据的域,在提交表单前将数据拆分为小于限额的数份,分别放在数个hidden域中,同时把原有域清空,再正式提交表单。服务器端还是用Request.Form()读取各hidden域的数据,再按照顺序把他们拼接起来就行了。主要代码如下:
注意:需要在Form中的HTML代码内指定一个DIV,以便向其中动态插入hidden域。
====客户端示例代码====
在Form中的HTML代码内加入:<div id=divHidden></div>,在Form标签中加入: onSubmit="return fnPreHandle(this)",将下面代码中的BigField换成您表单中提交大数据库的域的名称。
JavaScript代码
复制代码 代码如下:

<script language=javascript>
//数据拆分,并放到相应的hidden域中,在Form的onSubmit事件中激发
function fnPreHandle(MyForm)
{
var iCount; //拆分为多少个域
var strData; //原始数据
var iMaxChars = 50000;//考虑到汉字为双字节,域的最大字符数限制为50K
var iBottleNeck = 2000000;//如果文章超过2M字,需要提示用户
var strHTML;
//原始数据
strData = MyForm.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++)
{
MyForm.elements["hdnBigField" + i].value = strData.substring((i - 1) * iMaxChars, i * iMaxChars);
}
//原数据域清空
MyForm.BigField.value = "";
}
</script>

服务器端示例代码ASP/Visual Basic代码
复制代码 代码如下:

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