Linking Access 97 to a recordset??

[luvlylittlelady]

I have written some code to link VB to an access table, evcery time it runs i get an error "91" saying - Object variable or with block variable not set?

Not sure where i am going wrong

Code below is on a button - it keeps pointing to the first line of - Data1.Recordset.Movefirst

**Code**

List1.Clear
List2.Clear

Data1.Recordset.MoveFirst
Text2.Text = UCase(Data1.Recordset.Fields("Hotel ID&quot.Value)
Data2.Recordset.MoveFirst

While Not Data1.Recordset.EOF
List1.AddItem UCase(Data1.Recordset.Fields("Hotel ID&quot.Value)

If UCase(Text1.Text) = UCase(Data1.Recordset.Fields("hotel ID&quot.Value) Then
Text2.Text = UCase(Data1.Recordset.Fields("hotel type&quot.Value)
End If
Data1.Recordset.MoveNext
Wend

Data1.Recordset.MoveFirst

While Not Data2.Recordset.EOF
List2.AddItem UCase(Data2.Recordset.Fields("hotel name&quot.Value)

If UCase(Text1.Text) = UCase(Data2.Recordset.Fields("hotel id&quot.Value) Then
Text3.Text = UCase(Data2.Recordset.Fields("town&quot.Value)
End If
Data2.Recordset.MoveNext
Wend

Data1.Recordset.MoveFirst
Data2.Recordset.MoveFirst

 

[DeSn]

VB gives this error because your recordset is'n declared. It might be declared, but VB is sometimes a difficult men, just declare it again before you work with the recordset.

 

[luvlylittlelady]

Not sure what you mean there? could you explain some more please