" else i=0 do while NOT rs.EOF i=i+1 %> <% rs.movenext loop end if %>

<% Set rs= Server.CreateObject("ADODB.Recordset") rs.open "select * from news_info where typeid=23 order by newsid desc",conn,1 if rs.EOF then response.write "
目前还没有新闻