Guest_imported
New member
- Jan 1, 1970
- 0
HELP.....
I am trying to fill a single listbox, but when i run the code it makes a seperate listbox for every entry in the database. This is the code that is acting up:<%
Dim Conn
Dim VTTR
Dim Lmn
Set Vttr = Request.QueryString ("vtr"
sqltext = "Select * from Classifacation ;"
set conn = Server.CreateObject ("adodb.recordset"
conn.open sqltext, "Dsn=S215"
%>
<%
do until Conn.EOF
%>
<Form id=form1 name=form1>
<Form Action="127.0.0.1" id=form2 name=form2>
<SELECT id=select1 name=select1>
<OPTION><%=conn("business type"%></OPTION>
</SELECT>
</Form>
<%
Conn.MoveNext
loop
%>
Any ideas would be appreciated
I am trying to fill a single listbox, but when i run the code it makes a seperate listbox for every entry in the database. This is the code that is acting up:<%
Dim Conn
Dim VTTR
Dim Lmn
Set Vttr = Request.QueryString ("vtr"
sqltext = "Select * from Classifacation ;"
set conn = Server.CreateObject ("adodb.recordset"
conn.open sqltext, "Dsn=S215"
%>
<%
do until Conn.EOF
%>
<Form id=form1 name=form1>
<Form Action="127.0.0.1" id=form2 name=form2>
<SELECT id=select1 name=select1>
<OPTION><%=conn("business type"%></OPTION>
</SELECT>
</Form>
<%
Conn.MoveNext
loop
%>
Any ideas would be appreciated