主题:【求助】我的循环代码为何不更新呢?
For i = LBound(no1) To UBound(no1)
sql="select * from yyq_xx where no='"&no1(i)&"' "
set rs=server.createobject("adodb.recordset")
rs.Open sql,conn,1,3
If not(rs.bof and rs.eof) Then
rs("name")=sname
rs("date2")=date2
rs("zt")=zt
rs("admin")=admin
rs("ip") =ip
rs.update
end if
rs.Close
set rs=nothing
Next
为什么程序执行后只能更新第一条记录呢?
应该是该数组中的所有记录都被更新了啊 。
sql="select * from yyq_xx where no='"&no1(i)&"' "
set rs=server.createobject("adodb.recordset")
rs.Open sql,conn,1,3
If not(rs.bof and rs.eof) Then
rs("name")=sname
rs("date2")=date2
rs("zt")=zt
rs("admin")=admin
rs("ip") =ip
rs.update
end if
rs.Close
set rs=nothing
Next
为什么程序执行后只能更新第一条记录呢?
应该是该数组中的所有记录都被更新了啊 。