<select name="sex" id="sex">
<option value="<%=sex%>"><%=sex%></option>
<%
Set rs = Conn.Execute("Select * From g_danwei")
Do While Not rs.Eof
Response.Write "<option value='"& rs("danwei") &"'> " & rs("danwei") & "</option>"
rs.MoveNext
Loop
rs.close
%>
转载于:https://blog.51cto.com/2074637/775607