asp如何生成一个10到35之间的随机数？

下面这个函数可以生成N个不重复的随机数，范围你也可以指定
<%
Function RndNumber(MaxNum,MinNum)
Randomize
RndNumber=int((MaxNum-MinNum+1)*rnd+MinNum)
RndNumber=RndNumber
End Function

Function RndN(N,a,b) '产生一个长度为N的不重复的随机字符串，a为最小值，b为最大值
execute("dim shu("&N&")")
flag=false
i=0
while(i <N)
x=RndNumber(b,a)
j=0
while(j <i)
if shu(j)=x then flag=true
j=j+1
wend
if not flag then
shu(i)=x
i=i+1
else
flag=false
end if
wend
RndN=join(shu,",")
end function

response.write RndN(1,9,36)
%>