注册 登录
编程论坛 ASP技术论坛

SQL表单搜索功能,怎么让数据结果循环不重复显示

httydolphin 发布于 2012-09-17 00:01, 852 次点击
我想要的效果是多选项搜索表单,下拉结果数据不重复显示。

以下是正常查询循环的代码:
<P>付息方式: <SELECT id=droppay name=droppay>
<OPTION selected value=———请选择———>———请选择———</OPTION>
<%
Set rs= Server.CreateObject("ADODB.Recordset")  
sql="select * from 0762seo order by id desc "
rs.open sql,conn,1,1
do while not rs.eof
%>

<OPTION value=<%=rs("zp")%>><%=rs("zp")%></OPTION>

<%rs.movenext
loop
rs.close
set rs=nothing
%>

  </SELECT> </P>

得到结果是这样的
 
2012-9-16 02:54 上传下载附件 (30.22 KB)
 
2012-9-16 02:55 上传下载附件 (21.9 KB)
这个结果太惨不忍睹.

高手怎么处理掉这些重复的循环, 试了用 distinct  就都不显示了,具体要怎么用。  
 

只有本站会员才能查看附件,请 登录
5 回复
#2
wangjy5002012-09-17 17:23
<P>付息方式: <SELECT id=droppay name=droppay>
<OPTION selected value=———请选择———>———请选择———</OPTION>
<%
Set rs= Server.CreateObject("ADODB.Recordset")  
sql="select * from 0762seo order by zp desc "
rs.open sql,conn,1,1
Dim zp : zp = ""
do while not rs.eof
If rs("zp")<>zp Then
%>

<OPTION value=<%=rs("zp")%>><%=rs("zp")%></OPTION>

<%
zp=rs("zp")
End If
rs.movenext
loop
rs.close
set rs=nothing
%>

  </SELECT> </P>

这样试下行不行。
#3
httydolphin2012-09-20 14:18
哥哥   试了还是不行  有别有的办法了呢
#4
wangjy5002012-09-20 19:43
sql="select * from 0762seo order by zp desc "
这一句你改没改?
#5
不知1232012-09-21 08:39
sql="select * from 0762seo order by id desc "
修改为
sql="select distinct zp from 0762seo "
看看
#6
ysf01812012-09-22 10:31
<%
Set rs= Server.CreateObject("ADODB.Recordset")  
sql="select * from 0762seo order by zp desc, id desc "
rs.open sql,conn,1,1
zp = "|"
do while not rs.eof
   if zp <> rs("zp") then
     zp = rs("zp")
%>

<OPTION value=<%=rs("zp")%>><%=rs("zp")%></OPTION>

<%
   end if
   rs.movenext
loop
rs.close
set rs=nothing
%>

1