Access Connection?

Set conn = CreateObject("ADODB.Connection")
    conn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=db1_97.mdb"
    SQLstmt = "SELECT * FROM varer where samlet = abc"
    Set rs = CreateObject("ADODB.Recordset")
    rs.open SQLstmt, conn, 1, 3
    If Text1.Text = "abc" Then
        If kVarenummer(LinjeNummer) = "" Then
            kVarenummer(LinjeNummer) = rs("samlet")
            kBeskrivelse(LinjeNummer) = rs("beskrivelse")
            kPris(LinjeNummer) = rs("pris")
        Else
            LinjeNummer = LinjeNummer + 1
            kVarenummer(LinjeNummer) = rs("samlet")
            kBeskrivelse(LinjeNummer) = rs("beskrivelse")
            kPris(LinjeNummer) = rs("pris")
        End If
    End If
    rs.Close
    Set con = Nothing
Problemet er at den returnerer at abc ikke findes. Jeg har dobbeltchecket alle navne - men det virker stadig ikke.