<%set rs=server.createobject("adodb.recordset")
sql="select name from user"
rs.open sql,conn,1,1
if not rs.eof then%>
<select name="">
<%do while not rs.eof%>
<option value="<%=rs("name")%>"><%=rs("name")%></option>
<%rs.movenext
loop
end if
rs.close%>