Skjul en varegruppe

Jeg har nogle kategorier, der har tilhørende varegrupper. Ikke alle varegrupper har varer tilknyttet og derfor skal de ikke vises.

Tabellerne er:

[varegrupper]
varegruppe_id (nøgle)
navn
billede

[varer]
vare_id (nøgle)
varegruppe_id (feltet der forbinder tabellerne)
Navn
billede
osv...

Altså hvis der ikke er nogen varer tilknyttet varegruppen skal den ikke vises.

Nu ser min kode sådan ud:
<%
Set RS_varegrupper = Server.CreateObject("ADODB.RecordSet")
RS_varegrupper.open "Select * From [varegrupper] WHERE kategori_id = " & Request("kategori_id") &"", Conn_market, 1, 3

i = 0
while not RS_varegrupper.eof


if i mod 5 = 0 then
response.write "</tr><tr>"
end if
Response.write "<td>"%>
<center>
<%
Set RS_picture = Server.CreateObject("ADODB.RecordSet")
RS_picture.open "Select * From [billeder] WHERE billednummer = " & rs_varegrupper("billede") &"", Conn_market, 1, 3
%>
<b><font face="Arial" size="2">
<a href="kategorier.asp?Action=vis_varegruppe&varegruppe_id=<%=rs_varegrupper("varegruppe_id")%>"><img src="img/<%=RS_picture("filnavn")%>" border="0"></a><br>
</b><a href="kategorier.asp?Action=vis_varegruppe&varegruppe_id=<%=rs_varegrupper("varegruppe_id")%>"><br><%=RS_varegrupper("navn")%></a></font>
</center>
<%
Response.write "</td>"
i = i+1
RS_varegrupper.movenext
wend
%>
</table>
</center>

Kan jeg nøjes med en If sætning eller hvad mener I??