sql = "select id,title,content,news_cate,datetime from [news2]"
dim where
dim condi
condi = getSearchs(readySearch(request("q")))
if condi<>"" then
sql =sql&" where "&condi
end if
if request("id")<>"" then
if instr(sql,"where")>0 then
sql = sql&" and news_cate='"&request("id")&"'"
else
sql = sql&" where news_cate='"&request("id")&"'"
end if
end if
rs.pagesize=9
sql=sql&" order by datetime desc"
rs.open sql,conn,1,1
if not(rs.eof or rs.bof) then
if request("page")="" or request("page")=0 then
page=1
else
page=cint(trim(request("page")))
end if
if page>rs.pagecount then page=rs.absolutepage
rs.absolutepage=page
for i=1 to rs.pagesize
response.write("")
response.write(""&left(rs("title"),18)&""&rs("news_cate")&"")
response.write(""&left(RemoveHTMLTag(str),64)&"...")
response.write("More >")
rs.movenext
if rs.eof then exit for
next
所有数据都显示了
我是业余的,所以不懂怎么弄
判断字段为空时,不输出,只是输出非空字段