ASP 随机显示10条新闻

Select Top 10 * From 表 Order By Rnd(ID)
Rnd(ID) 其中的ID是自动编号字段，可以利用其他任何数值来完成，比如用姓名字段(UserName

Select Top 10 * From 表 Order By Rnd(ID)
Rnd(ID) 其中的ID是自动编号字段，可以利用其他任何数值来完成，比如用姓名字段(UserName)
Select Top 10 * From 表 Order BY Rnd(Len(UserName))

sql = "select top 10 * from SMT_yp where SMT_vip=2 order by rnd(smt_id)"
这样写只能是ACCESS数据库
如果是MS SQL SERVER数据库就得这样写：
select top 10 * from table order by newid()

<%
SET Rs = Server.CreateObject("ADODB.Recordset")
sql = "select top 10 * from SMT_yp where SMT_vip=2 "
Rs.Open sql,conn,1,3

do while not rs.eof
rs("字段名")
response.Write("<br>")
rs.movenext
loop
rs.close
set rs=nothing
%>

<%
Function KvRndNum(Min,Max) '生成随机数字
Randomize
KvRndNum=Int((Max - Min + 1) * Rnd() + Min)
End Function
%>