求助

bit-yxn

  rstwo.Open "select*from BOM修改表"
  rsthree.Open "select*from 版本号更新表"
   While rsthree.EOF
        While rstwo.EOF
            If rsthree("零件号") = rstwo("零件号") Then
                rsthree("零件图纸版本号") = rstwo("零件图纸版本号")
            Else
            End If
            rstwo.MoveNext
        Wend
    rsthree.MoveNext
    Wend
    rstwo.Close
    Set rstwo = Nothing
    rsthree.Close
    Set rsthree = Nothing

帮忙看下这段代码，为什么得不到想要的结果？
   

admin

代码在哪里会出错呢

轻风

是不是要改成这样： While rsthree.EOF = False         While rstwo.EOF = False......

bit-yxn

admin 发表于 2013-9-22 15:40
代码在哪里会出错呢

没有报错  就是实现不了想要的结果

bit-yxn

轻风 发表于 2013-9-22 16:04
是不是要改成这样： While rsthree.EOF = False         While rstwo.EOF = False......

解决了，用了个更新查询，谢谢啦~

轻风

bit-yxn 发表于 2013-9-22 17:19
解决了，用了个更新查询，谢谢啦~

那是，本来这个用更新查询就能轻松解决。
不过，你上面那代码应该是循环语句的条件有问题