求救: ASP中插入数据库异常, rs.update出错 30
原代码如下:<%url="Packing_CTRL.asp"setupload=newupload_5xsoft'实例化一个上传对象upload,这个无组件上传类最大只能...
原代码如下:
<%
url="Packing_CTRL.asp"
set upload=new upload_5xsoft '实例化一个上传对象upload,这个无组件上传类最大只能上200K的文件,上传超过200K文件,将会非常的慢,如果想上传更大的文件,可以使用有组件上传
function addpacking() '这是一个上传函数
dim sz
sz=trim(upload.form("size"))
'先判断是否已经存在该记录
set rs=server.CreateObject("adodb.recordset") '建立一个记录集对象rs
sql="select * from PACKING WHERE SIZE='" & sz & "'"
rs.open sql,conn,1,3 '打开记录集
If Not rs.EOF Or Not rs.BOF then '存在同名
response.write "<script language=javascript>"
response.write "alert('系统已存在该记录,请添加其它纪录!');"
response.write" history.go(-1);"
response.write "</script>"
response.end
exit function
else
rs.addnew
rs("SIZE")=trim(upload.form("size")) '这里要注意,必须用upload.form来获取表单的值,和平常不一样,不能用request.form
rs("PCCTN")=trim(upload.form("pcctn"))
rs("SQMCTN")=trim(upload.form("sqmctn"))
rs("KGCTN")=trim(upload.form("kgctn"))
rs("CTNUPLT")=trim(upload.form("ctnuplt"))
rs("SQMUPLT")=trim(upload.form("sqmuplt"))
rs("KGUPLT")=trim(upload.form("kguplt"))
rs("CTNDPLT")=trim(upload.form("ctndplt"))
rs("SQMDPLT")=trim(upload.form("sqmdplt"))
rs("KGDPLT")=trim(upload.form("kgdplt"))
rs("CTNCONT")=trim(upload.form("ctncont"))
rs("SQMCONT")=trim(upload.form("sqmcont"))
rs("KGCONT")=trim(upload.form("kgcont"))
rs.update '????????????????????????????????????
response.write "<script language=javascript>"
response.write "alert('OK!');"
response.write" history.go(-1);"
response.write "</script>"
response.end
end if
rs.close
set rs=nothing
end function
addpacking() '调用函数
%>
<META HTTP-EQUIV="Refresh" CONTENT="0;url=<%=url%>;charset=gb2312">
<!--这个META标签可以设置跳转到的页面,0表示0秒,url表示跳转到的页面地址-->
其中:
response.write "<script language=javascript>"
response.write "alert('OK!');"
response.write" history.go(-1);"
response.write "</script>"
response.end
是用来提示程序执行到哪里出错的,不属于原设计的一部分.
试了很多次,把上面这段放到rs.update前,会有提示"OK!",放到rs.update后面,就没有提示了,而且数据库中没有添加到记录, 请大家看看问题出在哪里? 谢谢!
已经解决,什么都没改变,突然间就可以了. 但还是找不到问题所在,可能是系统问题.
谢谢大家的解答,不过找不到问题的关键. 展开
<%
url="Packing_CTRL.asp"
set upload=new upload_5xsoft '实例化一个上传对象upload,这个无组件上传类最大只能上200K的文件,上传超过200K文件,将会非常的慢,如果想上传更大的文件,可以使用有组件上传
function addpacking() '这是一个上传函数
dim sz
sz=trim(upload.form("size"))
'先判断是否已经存在该记录
set rs=server.CreateObject("adodb.recordset") '建立一个记录集对象rs
sql="select * from PACKING WHERE SIZE='" & sz & "'"
rs.open sql,conn,1,3 '打开记录集
If Not rs.EOF Or Not rs.BOF then '存在同名
response.write "<script language=javascript>"
response.write "alert('系统已存在该记录,请添加其它纪录!');"
response.write" history.go(-1);"
response.write "</script>"
response.end
exit function
else
rs.addnew
rs("SIZE")=trim(upload.form("size")) '这里要注意,必须用upload.form来获取表单的值,和平常不一样,不能用request.form
rs("PCCTN")=trim(upload.form("pcctn"))
rs("SQMCTN")=trim(upload.form("sqmctn"))
rs("KGCTN")=trim(upload.form("kgctn"))
rs("CTNUPLT")=trim(upload.form("ctnuplt"))
rs("SQMUPLT")=trim(upload.form("sqmuplt"))
rs("KGUPLT")=trim(upload.form("kguplt"))
rs("CTNDPLT")=trim(upload.form("ctndplt"))
rs("SQMDPLT")=trim(upload.form("sqmdplt"))
rs("KGDPLT")=trim(upload.form("kgdplt"))
rs("CTNCONT")=trim(upload.form("ctncont"))
rs("SQMCONT")=trim(upload.form("sqmcont"))
rs("KGCONT")=trim(upload.form("kgcont"))
rs.update '????????????????????????????????????
response.write "<script language=javascript>"
response.write "alert('OK!');"
response.write" history.go(-1);"
response.write "</script>"
response.end
end if
rs.close
set rs=nothing
end function
addpacking() '调用函数
%>
<META HTTP-EQUIV="Refresh" CONTENT="0;url=<%=url%>;charset=gb2312">
<!--这个META标签可以设置跳转到的页面,0表示0秒,url表示跳转到的页面地址-->
其中:
response.write "<script language=javascript>"
response.write "alert('OK!');"
response.write" history.go(-1);"
response.write "</script>"
response.end
是用来提示程序执行到哪里出错的,不属于原设计的一部分.
试了很多次,把上面这段放到rs.update前,会有提示"OK!",放到rs.update后面,就没有提示了,而且数据库中没有添加到记录, 请大家看看问题出在哪里? 谢谢!
已经解决,什么都没改变,突然间就可以了. 但还是找不到问题所在,可能是系统问题.
谢谢大家的解答,不过找不到问题的关键. 展开
3个回答
展开全部
先把SQL打印,然后在数据库中运行.看下结果再进行测试..估计UPDATE的时候有问题.
以后首先看下SQL是什么信息在思考如何查找错误.
以后首先看下SQL是什么信息在思考如何查找错误.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
是不是你数据库存在不许空的字段?或是字段类型跟你的提交过来的类型不对
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询