Tælle antal svar som hedder 'fisk'

jeg skal i en quiz tælle antal som har svaret 'fisk' - men jeg får -1 fejl når jeg tester dettte:

set data = server.createobject("ADODB.connection")
data.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("quiz.mdb")

  sSQL = "select * from quiz WHERE svar='fisk'"

  set RS = data.execute( sSQL )


        i = rs.recordcount
        response.write("Tal: ") & i