Connection Problem

hello i have a database n i want to connect to it using ADODB.connection, this is the code i use

Dim con As New ADODB.Connection
Dim data As New ADODB.Record

data.Open "select * from table1", con
MsgBox data.fields(0)

but it says "The connetion can't be used to perform this operation, it is either closed or invalid in this context"

sorry this is the actual code i use

Dim con As New ADODB.Connection
Dim data As New ADODB.Record

con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Administrator\My Documents\db1.mdb;Persist Security Info=False"

data.Open "select * from table1", con
MsgBox data.fields(0)

try

VB Code:

Dim data As New ADODB.RecordSet

nickname

thnkx ... actually i figured it out maself that i shud have used Recordset instead of Record