How to run SQL in an MS Access module 1

[ftpdoo]

Dim tbl As TableDef
Dim db As Database
Dim rs As Recordset


Set db = CurrentDb
Set rs = db.OpenRecordset("SELECT * FROM Electricity")


I've written the code above.. How do I view the contents of this SQL? ie rs.item(1) to view the first item etc?

Have I even got this setup right? Its not bring back any results.

Thanks
ted

 

[lupins46]

You have to move to the first record, and then to each record in turn

if not (rs.eof and rs.bof) then
rs.movefirst
do until rs.eof
debug.print rs(1)
rs.movenext
Loop