ho un problema con il motore di ricerca che sto facendo
recupero in un array i valori inviati da un form

<form method="post" action="2.asp">
<input type="checkbox" name="categoria" value="a">
<input type="checkbox" name="categoria" value="b">
<input type="checkbox" name="categoria" value="c">
<input type="checkbox" name="categoria" value="a">
<input type="checkbox" name="categoria" value="e">
<input type="checkbox" name="categoria" value="a">
<input type="checkbox" name="categoria" value="c">


<input type="submit" name="invia" value="Invia">
</form>
nella pagina 2.asp ho il motore di ricerca dove carico i valori nell'array

<%
'connessione al database
Set Conn = Server.createobject("ADODB.Connection")
Conn.connectionstring="DRIVER={Microsoft Access Driver (*.mdb)};DBQ="& Server.Mappath("db1.mdb")
Conn.Open

'recupero i valori dal form e li carico nell'arrya

if Request.Form("categoria")<>"" then
cat= Split(Request.Form("categoria"), ", ")
for h=LBound(cat) to UBound(cat)
xx = cat(h)

set rs = server.CreateObject("ADODB.recordset")
'cerco i valori che ho scelto nel form
SQL="SELECT * from categoria where categoria like '%"&xx&"%' ;"
RS.Open SQL,Conn

if not rs.EOF then
%>
-- <%=rs("id")%><%=rs("categoria")%>

<%
end if

RS.MoveNext
next
end if
%>
<%
rs.close
set re = nothing

conn.close
set conn = nothing
%>

l'unico problema è che quando estraggo i dati vedo solo il primo valore per ogni categoria

ad esempi 1 a 3 c e non tutti gli a e i c selezionati

Come posso fare?