by Milind Kulkarni (2 Submissions)
Category: Active Server Pages
Compatability: ASP (Active Server Pages)
Difficulty: Unknown Difficulty
Originally Published: Fri 14th July 2000
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
Previous Code continued... Displaying Details of value send thru' select Box
VBcoders
if rsuser.RecordCount=0 then
Response.Write("No Matching Found for this product")
rsuser.Close
%>
<br><b><a href="itemmast.asp">Click to Go Back</a></b>
else
%>
<h2>Following are the Brands & Range of =Request.Form.Item("itemlst")%></h2><br>
<h4><br>Item Code : =Response.Write(objitem)%>
<form name=frm>
<table name=tbl1 border=1 bgcolor=AntiqueWhite>
<th>Name<th>BrandName<th>Specifications<th>Rate<th>Qty
<th>Select
public items(10)
public rates(10)
dim cnt
cnt=1
do until rsuser.EOF
items(cnt)=objbrand
rates(cnt)=objrate
rsuser.MoveNext
cnt=cnt+1
Response.Write items(cnt)
loop
rsuser.MoveFirst
dim i
do until rsuser.EOF
Response.Write "<tr><Td>" & objname
Response.Write "<td>" & objbrand
Response.write objspecs & "<td><input name=txtrate readonly value='"
response.write rsuser("rate") & "'>" & _
"<td><input size=2 value=1 readonly><td><input name=ch1 type=checkbox>"
rsuser.MoveNext
cnt=cnt+1
loop
'rsuser.Close
%>
</table>
No comments have been posted about Previous Code continued... Displaying Details of value send thru' select Box. Why not be the first to post a comment about Previous Code continued... Displaying Details of value send thru' select Box.
