<select name='ctrl_pingtai' id='ctrl_pingtai'>
<option value=''>--请选择--</option>
<%
Set Rs_pingtai=Server.CreateObject("adodb.recordset")
sql = "select * from [pingtai]"
Rs_pingtai.Open sql,conn,1,1
Do While Not Rs_pingtai.Eof
    Response.Write ("<option value='" & Rs_pingtai("pingtai_type") & "'>" & Rs_pingtai("pingtai_type") & "</option>" & vbcrlf)
    Rs_pingtai.MoveNext()
Loop
Rs_pingtai.Close()
Set Rs_pingtai = Nothing
%>
</select>

在sql语句上做小动作。

听说过Order By子句吗？

http://www.

可否指引一下呢？

谢谢指引

搞定了 YEAH~

<select name='ctrl_pingtai' id='ctrl_pingtai'>
<option value=''>--请选择--</option>
<%
Set Rs_pingtai=Server.CreateObject("adodb.recordset")
sql = "select * from [pingtai] order by pingtai_type"
Rs_pingtai.Open sql,conn,1,1
Do While Not Rs_pingtai.Eof
    Response.Write ("<option value='" & Rs_pingtai("pingtai_type") & "'>" & Rs_pingtai("pingtai_type") & "</option>" & vbcrlf)
    Rs_pingtai.MoveNext()
Loop
Rs_pingtai.Close()
Set Rs_pingtai = Nothing
%>
</select>

sql = "select * from [pingtai] Order By [字段名] ASC(升序)|DESC(降序)"
在select查询语句后面跟Order By 字句实现SQL查询结果的自动排序
比如某个表(Table)的ID字段是
ID
 0
 1
 2
 3
 4
 5

select * from Table Order By ID ASC

这样写查询结果就会是
ID
 0
 1
 2
 3
 4
 5
select * from Table Order By ID DESC
这样写则相反查询结果就是
ID
 5
 4
 3
 2
 1
 0
注:此方法不仅可以对数字类型的字段进行排序，日期等可进行排序的字段都可以使用这种方法。