problema logico nel ciclo if

[Osterello]

ciao,
vorrei realizzare un cliclo if che mi restituisca questo:

<tr>
<td>
TITOLO
<div>
prodotto 1

prodotto 2

prodotto 3
</div>
</td>
</tr>

<tr>
<td>
TITOLO2
<div>
prodotto 4

prodotto 5

prodotto 6
</div>
</td>
</tr>

<tr>
<td>
TITOLO3
<div>
prodotto 7

prodotto 8

prodotto 9
</div>
</td>
</tr> 

Per ora l'ho strutturata così, ma continua a chiudermi il div, tr e td anche se non dovrebbe.

<% 
While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF)) 
%>
<%var2 = (Recordset1.Fields.Item("ID_TITOLO").Value)
if var2 <> var1 then
%>

<tr>
      <td>
      [url="#"][b]<%=(Recordset1.Fields.Item("TITOLO").Value)%>[/b][/url]
       
      <div id="job<%=var2%>" >
      <%end if%>
      
      <%=(Recordset1.Fields.Item("prodotto").Value)%>
      <%if var 2 <> var 1 then%>
      </div></td></tr>
      <%end if%>
       <%       
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  Recordset1.MoveNext()
  
  var1 = var2
  
Wend
%> 

Dove sbaglio?
Grazie

[optime]

è sbagliata la logica, che dovrebbe essere

apro il primo titolo
do while not rs.eof
se è cambiato chiudo e riapro
scrivo i dettagli
loop
chiudo l'ultimo titolo

[Osterello]

Grazie Optime della risposta, effettivamente così sembra filare. Ora provo