VB Help Required!

[nathan sanders]

Hi (again),

I am trying to write some code to read records from a table and perform
actions based on the contents of Field3.

I get and eror (qualifier must be collection) at the point of '!field3' from
the code below. What am I doing (or not doing) wrong? -


Sub process_bank_trans()

Dim intrans As Recordset
Dim strsq1 As String
Dim dbs As Database
Dim strtxt As String

Set dbs = CurrentDb

strsq1 = _
"select * from indata"

Set intrans = dbs.OpenRecordset(strsq1)

Do Until intrans.EOF

strtxt = strsq1!field3


Any help much appreciated.

Cheers
Nathan

 

[tina]

try

strtxt = intrans("field3")

hth