Pasar Varios Checkbox usando For Each o While o If?

[Owen-Bonilla]

Buen dia.

Tengo el siguiente menú de comida:


El cual, al seleccionar cada producto (y cantidad) que pida el cliente, lo mando a una vista previa para confirmar pedido.

Necesito, que al yo seleccionar un producto (activando su casilla correspondiente de checkbox), me pase a otra página (vista previa) los productos que yo haya "activado" y los que no, obviamente que no me los muestre.

Leí que con un For Each puedo hacerlo; lo intente pero me arroja lo siguiente:


Me muestra el mismo registro unas (casi) 100 veces.

Mi código es el siguiente:

Código HTML:

 <% For each comida in request.Form %>
					<tr>
						<td width="22">
						<font face="Arial" size="2"><%=Request.Form("CantGord1")%></font> <input type="hidden" name="CantGord1" value="<%=Request.Form("CantGord1")%>"> </td>
						<td>
						<p align="center"><font face="Arial" size="2"><%=Request.Form("Comida")%> </font></td>
						<td width="95">
						<p align="center"><font size="2" face="Arial"><%=Request.Form("QueRe")%></font></td>
						<td width="148">
						<p align="center">
						<font face="Arial" size="2"><%=Request.Form("GordGuis1")%></font><input type="hidden" name="GordGuis1" value="<%=Request.Form("GordGuis1")%>"></td>
						<td width="157">
						<p align="center"><font face="Arial" size="2">OTROGUISO</font></td>
						<td width="61" align="left">
						<p align="right">
						<%
						Dim Gordita1
						Dim QueRe
						Dim CantGord1
						Dim Quere1
						
						Gordita1=Request.Form("Gordita1")
						QueRe=Request.Form("QueRe")
						CantGord1=Request.Form("CantGord1")
						QueRe1=Request.Form("QueRe1")
						%>
						<% IF Request.Form("QueRe")="0" THEN %>
						<font face="Arial" size="2"><b>$ <%=CInt(Gordita1) * CInt(CantGord1)%>ºº</b></font><input type="hidden" name="SubTotalGord1" value="<%=CInt(Gordita1) * CInt(CantGord1)%>"></td>
												
						<% ELSE %>
						<font face="Arial" size="2"><b>$ <%=CInt(Gordita1) * CInt(CantGord1) + CInt(QueRe1)%>ºº</b></font><input type="hidden" name="SubTotalGord1" value="<%=CInt(Gordita1) * CInt(CantGord1) + CInt(QueRe1)%>"></td>
						
						<% END IF%>
					</tr>
					<% NEXT %> 

Qué estoy haciendo mal?.
En mi caso, el For Each me es viable?, o es mejor un IF?.. un Bucle o un WHILE?..

Alguna sugerencia?.

Gracias