<% set conn = server.createobject("adodb.connection") conn.open Application("sql") set rs = server.createobject("adodb.recordset") sql = "select * from news where keyword = '2006城市水业战略论坛' and DateDiff(d,time,getdate()) >= 0 order by time desc" rs.open sql,conn,1 while not rs.eof title = rs("newstitle") %> <% rs.movenext wend rs.close set rs = nothing conn.close set conn = nothing %>

	会议动态
相关新闻
	" title="<%=title%>" target="_blank"> <%=title%> <%if len(rs("newspic"))>1 then%> （图文） <%end if%> <%=formatdatetime(rs("time"),2)%>