有段代码请大家看看,运行时提示错,不解,请教各位....

ChenQ 厦门亿唐科技有限公司 技术总监/研发总监  2001-07-18 09:21:25
i=20
id=10
sql="select * from En_aud where id='"&id&"'"

Set vacRst=Server.CreateObject("ADODB.Recordset")
vacRst.Open sql,conn,adOpenKeyset,adLockBatchOptimistic
if vacRst.EOF=false then
for j=1 to i
vacRst("aud_A")=Trim(Request.Form("aud_A"&i))
vacRst("aud_B")=Trim(Request.Form("aud_B"&i))
vacRst("aud_C")=Trim(Request.Form("aud_C"&i))
vacRst("aud_D")=Trim(Request.Form("aud_D"&i))
vacRst("aud_key")=Trim(Request.Form("aud_key"&i))
vacRst.movenext
next
vacRst.Update
vacRst.close
else
errlist=errlist+"<li>Error(S) occuring when updating data. </li>"
end if
从表中检索出来的记录是20个记录,但为什么update不了呢?
...全文
47 点赞 收藏 3
写回复
3 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
ChenQ 2001-07-19
我试出来,谢谢sunda(黑子)!给你加分了
回复
ChenQ 2001-07-19
我试了,这样还是不行的
vacRst.update应该是这个
vacRst.updatbatch,
回复
sundna 2001-07-18
i=20
id=10
j=1
sql="select * from En_aud where id='"&id&"'"

Set vacRst=Server.CreateObject("ADODB.Recordset")
vacRst.Open sql,conn,adOpenKeyset,adLockBatchOptimistic
if not vacRst.EOF then
do while not vacRst.EOF and j<=i
vacRst("aud_A")=Trim(Request.Form("aud_A"&j))
vacRst("aud_B")=Trim(Request.Form("aud_B"&j))
vacRst("aud_C")=Trim(Request.Form("aud_C"&j))
vacRst("aud_D")=Trim(Request.Form("aud_D"&j))
vacRst("aud_key")=Trim(Request.Form("aud_key"&j))
vacRst.Update
vacRst.movenext
j=j+1
loop
vacRst.close
else
errlist=errlist+"<li>Error(S) occuring when updating data. </li>"
end if

试试看这样行不!
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2001-07-18 09:21
社区公告
暂无公告