This is what I did in a TABLE, not sure if it will work for you.
------------------------------------
Parts on this Order <%=RS2("Recs"

%> <br>
Note: To Delete a part key in a Zero Quantity. Then click the 'View Final Order' button and it will be deleted.
</p>
<table border="1" width="90%" bordercolor="#0066FF">
<tr>
<td width="10%" align="center" bordercolor="#000000" bgcolor="#000000">
<p align="left"><font color="#FFFFFF">QTY</font></td>
<td width="18%" align="center" bordercolor="#0066FF" bgcolor="#000000">
<p align="left"><font color="#FFFFFF">Part Number</font></td>
<td width="52%" align="center" bordercolor="#000000" bgcolor="#000000">
<p align="left"><font color="#FFFFFF">Description</font></td>
<td width="12%" align="right" bordercolor="#000000" bgcolor="#000000">
<p align="left"><font color="#FFFFFF">Price</font></td>
<tr>
<td width="10%" align="left"> </td>
<td width="18%" align="left"> </td>
<td width="52%" align="left"> </td>
<td width="12%" align="right"> </td>
</tr>
<%
If Not RS3.EOF Then
Do%>
<tr>
<td width="10%" align="center">
<%PNum =trim(RS3("Part Number"

)%>
<p align="center"><input type="text" name="QTY <%=Pnum%>" size="4" value="<%=RS3("QTY"

%>"></td>
<td width="18%" align="center">
<p align="center"><%Response.Write RS3("Part Number"

%></td>
<td width="52%" align="center">
<p align="center"><%Response.Write RS3("Description"

%></td>
<td width="12%" align="right">
<%If RS3("ListPrice"

= 0 then
Price1 = "Call"
Else
Price1 = FormatCurrency(RS3("ListPrice"

,2,0,0,0)
End if%>
<p align="center"><%Response.Write Price1%></td>
</tr>
<% RS3.Movenext
Loop Until RS3.EOF%>
<p><input type="submit" value="View Final Order" name="Final"> To Add more parts use your BACK button
------------------------------
Then I used the following to get all the values on the receiving page. So the name of the item passed was the quantity and the partnumber itself and the value was the quantity.
Like so: (this is for a 2 part number order)
QTY+100200=6&QTY+100205=1
So the name of the first textbox is QTY100200 with a value of 6 the second is QTY100205 with a value of 1.
Then I stripped of the QTY part to get the number. As Shown below.
--------------------------------
<% For Each name In Request.querystring%>
<%Item=name%>
<%If left(Item, 3) = "QTY" then%>
<%pnum=right(Item,len(Item)-4)%>
<%Qty=Request.querystring(name)%>
<%if len(Qty) > 1 then
for a = 1 to len(qty)
b = mid(Qty,a,1)
If asc(b) > 49 and asc(b) < 57 then
Qty1 = b
end if
next
Else
Qty1 = Qty
end if%>
<%If Qty1 = 0 then
' don't add part to list
else%>
<%Set RS1 = Conn.Execute("SELECT [STOCK_CODE], [Description], [SELLING_PRICE] FROM [Copy-PartMaster Lite] Where [STOCK_CODE] = N'" & pnum & "'"

%>
<tr>
<td width="18%" align="left"><%=pnum%><input type="hidden" name="QTY <%=pnum%>" size="4" value="<%=Qty1%>"></td>
<td width="52%" align="left"><%=RS1("Description"

%></td>
<td width="10%" align="center"><%=Qty1%></td>
<td width="12%" align="right"><%=FormatCurrency(RS1("SELLING_PRICE"

,2,0,0,0)%></td>
<%price = Qty1 * RS1("SELLING_PRICE"

%>
<td width="18%" align="right"><%=FormatCurrency(Qty1 * RS1("SELLING_PRICE"

,2,0,0,0)%></td>
</tr>
<%Total = Total + price%>
<%End If%>
<%End if%>
<% Next %>
--------------------
Hope this helps
DougP, MCP
Visit my WEB site
to see how Bar-codes can help you be more productive