AndyShuter
Registered User.
- Local time
- Today, 04:14
- Joined
- Mar 3, 2003
- Messages
- 151
Racked my brains all afternoon, but this one is really stumping me.
Dim rsTransaction2 As Recordset
Set rsTransaction2 = New Recordset
rsTransaction2.Open "qryTransaction" ***WHERE***, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs2Transaction2 ("Lapsed") = True
rsTransaction2.MoveNext
What I would like to do is update only the records in the query that equal "Deal Code" - I believe I have to put SELECT after the "qryTransaction" bit and then do a do while loop until the end of the recordset is reached
Bit of a novice so some help would really be appreciated!
Dim rsTransaction2 As Recordset
Set rsTransaction2 = New Recordset
rsTransaction2.Open "qryTransaction" ***WHERE***, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs2Transaction2 ("Lapsed") = True
rsTransaction2.MoveNext
What I would like to do is update only the records in the query that equal "Deal Code" - I believe I have to put SELECT after the "qryTransaction" bit and then do a do while loop until the end of the recordset is reached
Bit of a novice so some help would really be appreciated!
