asp 如何只输出数据库表中有数据的字段

只要输出显示 news2 这个表里面的有数据的字段,目前的代码是所有数据都输出显示,但是数据里有一些是空字段,所以只想输出有字段的数据,想通过判断news2 某个字段为空时 不输出显示,以下为代码,,要怎么改??

 

<%
sql = "select id,title,content,news_cate 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
				

dim str
str=""&rs("content")&""		

						response.write("<a href='sqnews.asp?id="&rs("id")&"' class='listbox' style='padding: 30px 0 0 0;' >")
						response.write("<span class='tis'>"&left(rs("title"),18)&"<i class='newscl' style='display: none'>"&rs("news_cate")&"</i></span>")
						response.write("<span class='newcons'>"&left(RemoveHTMLTag(str),64)&"...</span>")
						response.write("<span class='time clearfix'><i></i></span><span class='more'>More ></span></a>")
					    	rs.movenext
					    	if rs.eof then exit for
					  		next
				
Function RemoveHTMLTag(fString)
    Dim ObjReg
    If(Isnull(fString))Then fString=""
    fString = Replace(Replace(fString,"&lt;","<"),"&gt;",">")
    Set ObjReg = New RegExp
    ObjReg.Pattern = "<[^>]+>|</[^>]+>"
    ObjReg.Global = true
    fString = ObjReg.Replace(fString,"")
    RemoveHTMLTag = fString
End Function
%>

 

有没有老哥帮忙啊