Correct VBA for DO WHILE i.e. X=X AND NOT RS.EOF
Nothing wrong with how you're doing it, however you may wish to try using
the Recordset as the main section of the loop, and the test inside that loop.
Something like the following.
'New Version of Case #1
Do While Not RS.EOF
'01 - Test for TranNumMem
If TranNumMem = TransactionsRS!TranNum Then Exit Do
' xxxxxxx
' xxxxxxx
RS.movenext
Loop 'While Not RS.EOF
" wrote:
2003/2007
Attempting to:
CASE #1
Do While TranNumMem = TransactionsRS!TranNum AND NOT RS.EOF
' xxxxxxx
' xxxxxxx
rs.movenext
Loop
The clause TranNumMem = TransactionsRS!TranNum works but the
AND NOT RS.EOF is not working
I worked around with:
CASE #2
Do While TranNumMem = TransactionsRS!TranNum
' xxxxxxx
' xxxxxxx
rs.movenext
If RS.EOF Then Exit Do
Loop
How could I make CASE #1 work??
TIA EagleOne
|