Access 2003 Front Connected to SQL 2005 Backend
I have a multi-select listbox that shows a filtered list according to
a date range referenced from a ctrl on the form.
I need to update 2 fields on only the selected records. I have tried
a couple of different methods without success.
This is my current code:
Dim i As Integer
For i = 0 To Me.List5.ListCo unt - 1
'Me.List5.optio ns = dbSeeChanges
strSQL = "SELECT * FROM qDeposit_1 WHERE TransID =" &
Me.List5.ItemDa ta(0)
Set rs = CurrentDb.OpenR ecordset(strSQL , dbOpenDynaset,
dbSeeChanges)
If rs.RecordCount 0 Then
rs!DepositDate = Date
End If
Next i
Now I am getting a runtime error 3061 too few parameters, expected
2, and it appears to be the "set rs" line that is causeing the
problem.
Am I going about this in the right fashion or should I be trying a
different approach?
As Always
Any and ALL help Appreciated!
I have a multi-select listbox that shows a filtered list according to
a date range referenced from a ctrl on the form.
I need to update 2 fields on only the selected records. I have tried
a couple of different methods without success.
This is my current code:
Dim i As Integer
For i = 0 To Me.List5.ListCo unt - 1
'Me.List5.optio ns = dbSeeChanges
strSQL = "SELECT * FROM qDeposit_1 WHERE TransID =" &
Me.List5.ItemDa ta(0)
Set rs = CurrentDb.OpenR ecordset(strSQL , dbOpenDynaset,
dbSeeChanges)
If rs.RecordCount 0 Then
rs!DepositDate = Date
End If
Next i
Now I am getting a runtime error 3061 too few parameters, expected
2, and it appears to be the "set rs" line that is causeing the
problem.
Am I going about this in the right fashion or should I be trying a
different approach?
As Always
Any and ALL help Appreciated!