Populate data from table(MySQL) and put it on a combo box

[joeyramirez]

I need a code that can populate data from a table and put it on a combo box without using a loop.My code looks like this:



<%
Dim sql5,rs5
sql5= "SELECT * FROM tblstatus"
Set rs5= Server.CreateObject("ADODB.Recordset")
rs5.Open sql5, Conn, 1,3
%>
<select name="cbostatus">
<%
While not rs5.EOF
%>
<option value="<%=rs5("statusID")%>" selected="<%=rs("sid") %>"><%=rs5("status")%></option>
<%
rs5.MoveNext
Wend

Set rs5= nothing
%>
</select>

[joeyramirez]

I need a very short code.

[Doug G]

Why do you not want to use a loop? Looping is a basic programming construct.

[joeyramirez]

I will put this combo box in an edit page. I think the combo box loop will be inside another loop. Is it ok to have a loop inside another loop?

[siteguru]

How many elements in the combobox loop?

How many elements in the outer loop?

[joeyramirez]

I have 10 on the outer loop

[joeyramirez]

the user can add data on the combo box