查询公告列表

<%

set NoticeListRs=server.CreateObject("adodb.recordset")

NoticeListRs.open "select top 5 ItemID,Item1 from Cuz_Notice where "&ItemRecT&" order by ItemID desc",conn,1,1

do while not NoticeListRs.eof

%>

<li><a href="/Notice/Show.asp?ItemID=<%=NoticeListRs("ItemID")%>" target="_blank"><%=NoticeListRs("Item1")%></a></li>

<%

NoticeListRs.movenext

loop

NoticeListRs.close

set NoticeListRs=nothing

%>