我想在表单中通过下拉框选择不同的字段（可选择具体值也可选择空）来实现分类统计
即根据表单提交的条件从数据库中查找信息。
但有这么多条件我不知道怎么写sql语句（主要是and的有无）
请大家指点，谢谢！！！！
<%
dim searchday
if request("DateSearch")="all" then
searchDay=""
else
searchDay=" DATEDIFF('d',addtime2,Now()) < "&request("DateSearch")
end if
dim fhname
if request("fhname")="" then
fhname=""
else
fhname=" fhname='"&request("fhname")&"'"
end if
dim jgdw
dim he
if request("jgdw")="" then
jgdw=""
else
jgdw="jgdw='"&request("jgdw")&"'"
end if
dim tj
if request("DateSearch")="all" and request("fhname")="" and  request("jgdw")="" then
tj=""
else
tj="where"
end if
dim he1,he2,he3
if searchDay<>"" and  request("fhname")<>"" then
he1="and"
else
he1=""
end if
if (searchDay<>"" or  request("fhname")<>"") and request("jgdw")<>"" then
he2="and"
else
he2=""
end ifdim pagecount,page,Spage,Epage,recordcount,i
page = request.querystring("page")
if page = "" or IsNull(page) then page = 1
if not IsNumeric(page) then page = 1
page = Cint(page)
set rs = server.CreateObject ("Adodb.recordset")sql="select * from huowu "&tj&searchday &he1&fhname&he2&jgdw&" order by hwid desc"
rs.open sql,conn,1,1

我的程序中时间默认是全部时间，也可选择时间段，即：
if request("DateSearch")="all" then
searchDay=""
else
searchDay=" DATEDIFF('d',addtime2,Now()) < "&request("DateSearch")
end if
其它都是可选的，如果选就使之等于取得的值request("fhname")&"，如果不选就为空，fhname=""。代码如：
if request("fhname")="" then
fhname=""
else
fhname=" fhname='"&request("fhname")&"'"
end if
问题是如果时间searchDay=""，如果后面的都为空的话就不需要where条件句了，即查找全部。但如果后面又不为空的就得有where句。我不知道怎么确定何时有何时无where据，以及后面的and的有无/
请大家帮忙看看，给点意见或帮忙改改。谢谢！！！

问题解决，谢谢大家！！！