■■■■■■■求教,关于通过下拉菜单选择相对应的SQL语句■■■■■■■■

[yinxun]

dim currentpage,page_count,Pcount
dim totalrec,endpage
if Request.QueryString("page")="" then
currentPage=1
else
currentPage=cint(Request.QueryString("page"))
end if

pagename="查看记录"

if not login then
errinfo="<li>只有登陆方可查看"
call showError()
end if

call bodySkin()
sub pageContent()
showMsg()
end sub

function showMsg()

sql="select * from jw where replycode <> 0 order by usertime desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1

if rs.eof and rs.bof then
rs.close
set rs=nothing
errinfo="<li>还没有任何记录"
call showError()
end if

rs.pagesize = perpage
rs.absolutepage=currentpage
page_count=0
totalrec=rs.recordcount

if not totalrec mod perpage=0 then
if currentPage > (totalrec/perpage)+1 then response.redirect "?page=" & Int((totalrec/perpage))+1
else
if currentPage > (totalrec/perpage) then response.redirect "?page=" & Int((totalrec/perpage))
end if
再往下面就是数据显示的相关语句


这里的sql语句

sql="select * from jw where replycode <> 0 order by usertime desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
我想作成一个效果 就是在页面上有个下拉菜单 每种选择对应一种sql语句 然后,下面的表格就显示这种sql语句的记录,比如有的是replycode <> 0,有的是replycode = 1等等

请问这语句该怎么写啊?

谢谢~

[redcn2004]

下拉菜单使用Get方式提交参数，具体的话，我建议你看看动易最老的一个版本的文章管理系统，后台有一个会员管理功能的部分有相同的功能，建议你看看