回 帖 发 新 帖 刷新版面

主题:【求助】我的循环代码为何不更新呢?

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 

为什么程序执行后只能更新第一条记录呢?
应该是该数组中的所有记录都被更新了啊 。

回复列表 (共1个回复)

沙发

rs.Close
    set rs=nothing 位置不对,应该在next 外
没搞明白for 的位置,

我来回复

您尚未登录,请登录后再回复。点此登录或注册