Insert into og boolske værdier ?!

Hej Eksperter

Jeg har et problem med at skrive boolean værdier til min Access DB. Følgende virker fint, hvis jeg kun skriver strengen St, men når jeg tilføjer Bl delen får jeg en \'Too few parameters fejl\'.


Public Function openRecordset(St As String, Bl As Boolean) As ADODB.Recordset

    strSQL = _
  \"INSERT INTO tablename (st, Bl) VALUES (\'\" _
  & St & \"\', \" & Bl  & \");\"

    With openRecordset
        Set .ActiveConnection = CN
        .CursorType = adOpenKeyset
        .LockType = adLockPessimistic
        .Source = strSQL
        .Open
    End With
End Function

Jeg har prøvet både med og uden asteriks (\') omkring Bl i SQL-sætningen.

Håber at der er en der kan se fejlen
Frogger