asp生成某一范围内的随机数

<%
'自定义函数
Function RndNumber(MaxNum,MinNum)
 Randomize 
 RndNumber=int((MaxNum-MinNum+1)*rnd+MinNum)
 RndNumber=RndNumber
End Function

'产生一个800~900之间的随机数
response.write RndNumber(900,800)
%>