请帮忙分析一下这段代码，为什么是死循环？

李志能　发表于：2016-10-22 15:28:37 　

    strSQL = "SELECT * FROM [tblOutput_raw]"
    Set rst = OpenADORecordset(strSQL, adLockOptimistic, cnn)
    Set rstTmp = CurrentDb.OpenRecordset("TMP_tblOutput_raw")
    '首先删除表[tblOutput_raw]中和临时表重复的记录
    Do Until rstTmp.EOF
        Do Until rst.EOF
            If rst![ID] = rstTmp![ID] Then
                rst.Delete
            End If
        Loop
        rstTmp.MoveNext
        rst.MoveFirst
    Loop

Top

善解人衣发表于：2016-10-22 15:34:00

我怎么看也不是死循环啊，难道是记录太多了执行慢？反正半天没反应......

Top

西出阳关无故人发表于：2016-10-24 17:19:04

Do Until rstTmp.EOF
        Do Until rst.EOF
            If rst![ID] = rstTmp![ID] Then
                rst.Delete
            End If


 rst.MoveNext     '要添加这一句，才有可能吧？
        Loop

rstTmp.MoveNext
        rst.MoveFirst
    Loop

Top

竹笛发表于：2016-10-24 21:02:27

如2楼所示，里面的rst记录集一直没有移动到下一条记录或是跳出循环。

Top

善解人衣发表于：2016-10-27 15:05:17

Top

总记录：4篇页次：1/1 9 1 :

Access交流中心

请帮忙分析一下这段代码，为什么是死循环？