<select name="select1" class="wenbenkuang">
<option value=<%=rs("leixing")%> selected><%=rs("leixing")%></option>
<%
set rs1=server.CreateObject ("ADODB.RecordSet")
sql="select * from leixing "
rs1.open sql,conn
while not rs1.eof
%>
<option value=<%=rs1("leixing")%>><%=rs1("leixing")%></option>
<%
rs1.movenext()
wend
%>
</select>