infotop4.asp

程序名称：酷虎网校友录 V1.0 （商业版）*(修改版） * 本软体为商业软件

<%
SQL="SELECT TOP 4  ID,主题 FROM 信息发布 ORDER BY ID DESC"
Set RS=server.Createobject("ADODB.Recordset")
RS.open SQL,Conn,1,1
DO While Not RS.EOF
AbsolutePositionReCordset4
%>
<a href=infodisplay.asp?id=<%=RS("ID")%>>
<%
CharCountLimit RS("主题"),12
%>
</a>
<%
Response.Write "<BR>"
rs.movenext
loop
Set RS=Nothing
%>