Fejl i dataudtræk

Hvad er galt her?
Prøv at se siden: http://shop.ar-intertrading.dk/index.asp?pageid=3&show=liste&kategori=Motorkul (der er ikke gjort noget i design endnu).
Koden der laver udtrækkene ser ud som følger:
IF show = "liste" AND marke = "" THEN
    sql = "SELECT DISTINCT model FROM vare WHERE beskrivelse = '" & kategori & "' ORDER BY model"
    SET rs = Conn.Execute(sql)
    DO UNTIL rs.EOF
%>
<li><a href="index.asp?pageid=<%=pageid%>&show=liste&kategori=<%=kategori%>&marke=<%=rs("model")%>"><%=rs("model")%></a></li>
<%
    rs.MOVENEXT
    LOOP
END IF

Håber at nogen kan hjælpe mig!