Type Mismatch?

Hvorfor får jeg "Type Mismatch" i linien <Set rs = db.OpenRecordset("select * from tabel")>

??? Hvad har jeg glemt/overset - Bruger Access97
   


Dim db As Database


Public Function selectsql(sqltxt As String) As Recordset

   
    Dim rs As Recordset
   
    Set rs = db.OpenRecordset("select * from tabel")
   
    Set selectsql = rs
   
End Function

Public Sub openConn()

    Set db = OpenDatabase("c:\data.mdb", True)
   
End Sub