Error opening a recordset 1

[patwadd]

Can anyone tell me what is wrong with this code?
------------------------
Private Sub Form_Load()
Dim db As Database
Dim rsControl As Recordset
Dim strDownload As String

Set db = CurrentDb
Set rsControl = db.OpenRecordset("Control&quot
strDownload = rsControl("LastDownload&quot
MsgBox (strDownload)
End Sub
------------------------
The line "Set rsControl = db.OpenRecordset("Control&quot" gives an error code 13, Type Mismatch.

"Control" is a table containing just one record.

I am using Access XP and the database is in Access 2000 format.

Thank you

 

[kevinclark]

Try the modifying your dimensions as follows:

Dim db As DAO.Database
Dim rsControl As DAO.Recordset

 

[JoaoTL]

Hi, if it is a TABLE use

The line "Set rsControl = db.OpenRecordset("Control",DbOpenDynaset) Best Regards

---
JoaoTL
mail@jtl.co.pt
MS Access Site:

http://www.jtl.co.pt

The Page:

http://www.jtl.co.pt/Access

moved to

http://www.jtl.co.pt