Flere poster i db'en

Jeg er forbinder en DB'en:


str = session("ProdID")
tabel = split(str," , ")

for x=0 to ubounD(tabel)


strSQL = "Select * from Product WHERE ID = " & tabel(x) & ""
Set rs = Conn.Execute(strSQL)

count = 0
   
  if RS.eof then %>

      <span class="Text">Der findes ingen produkter i denne produkt-gruppe</span>

  <%end if
    Do While Not RS.EOF
    count = count + 1       
%>
    Produkt: <% = rs("ProductName") %> 1 <br>       
    if
  <%       
RS.MoveNext
Loop     
next

Hvis nu der findes flere af de samme ProdID sessionen, skal et-tallet efter <% = rs("ProductName") %>  ændres til det antal som findes i sessionen