From 2003 to2007

[Jean-Paul]

Hi,

I converted my code from my previous 2003 version to the new access2007
version.

I get following error:
(I have to translate so could be a bit different)

error 13 during executing:
Types are not matching

The code:

Dim db As Database
Dim tb As Recordset
Dim kl As String, afd As String, jr As String
Set db = CurrentDb()
Dim sql As String
sql = "SELECT leerlingen.* FROM leerlingen Where leerlingen.ID=" &
[Forms]![Gedrag]![leerling] & " ; "
Set tb = db.OpenRecordset(sql)

I get the message at line:
Set tb = db.OpenRecordset(sql)

In my 2003 version there is no problem... in the 2007 there is!!

What to do?
Thanks

 

[Douglas J. Steele]

Try changing

Dim tb As Recordset

to

Dim tb As DAO.Recordset