没人帮助还是太难？

sdfch

向各位赐教，如何解决出错。我用的是ACCESS2000中文版。

Set db = OpenDatabase("g:\工资.mdb")
    db.Execute "delete from 个人税"
    DoCmd.OpenQuery "个人所得税"  '执行一追加查询到表“个人税”,
    Set rsl = db.OpenRecordset("个人税", dbOpenTable)
    If rsl.RecordCount = 0 Then
       Exit Sub
    End If
    rsl.MoveFirst ‘这里出错，提示“没有记录”,但表中有多行数据。调试时F8可以通过

cnqdcc

如果你用的是dao，你尝试一下把引用中的ado引用去掉