| <%set rs=server.CreateObject("adodb.recordset") randomize sql="select top 5 * from SW_article where classid in (select classid from SW_article where articleid="&request("articleid")&") order by rnd(-(articleid)*"&rnd()&")" rs.open sql,conn,1,1 do while not rs.eof%> <tr> <td width="4%">·</td> <td width="82%" height="22"><A href="showinfo.asp?articleid=<%=rs("articleid")%>" title="<%=rs("title")%>"><%=rs("title")%></A></td> <td width="14%"><%=rs("updatetime")%></td> </tr> <%rs.movenext loop rs.close%> www.sjlong.com发布 |