ASP代码分析 急

<%
Randomize
intRandomNumber = Int(1000 * Rnd) + 1
Sql="Select top 100 * From Papers order BY Rnd("& (-1 * intRandomNumber) &"* id)"
Set rs=conn.Execute(SQL)
i=0

do while not rs.eof
i=i+1
%>

请问哪位大哥能告诉我这段代码的意思是什么

<%
Randomize   '配合 Rnd，使 Rnd每次产生的随机数都不一样，Rnd  产生0到1之间的随机数
intRandomNumber = Int(1000 * Rnd) + 1

  ' 产生一个1到1000之间的随机数，并赋值给intRandomNumber
Sql="Select top 100 * From Papers order BY Rnd("& (-1 * intRandomNumber) &"* id)"

  '  查询表Papers ，以Rnd("& (-1 * intRandomNumber) &"* id）按升序排列，取前100条数据作为结果集
Set rs=conn.Execute(SQL)

  '  执行查询语句
dim i=0    ' 初始化变量 i
do while not rs.eof    ' do while 循环，while后面是条件
i=i+1    'do while 循环时执行的语句
%>