asp如何随机生成4到6的数字?

[ 本帖最后由 sunfeiyao 于 2013-1-7 18:23 编辑 ]

随机数%2+4

这个可以用random(4,6);

function Rndstr()
     dim Strs,i,Str,N
     Strs = "456" 'Strs="1234567890"
     Max=len(Strs)
     Randomize
     for i=1 to 1
     N=int(Max*rnd+1)
     Str=Str+mid(Strs,N,1)
     next
     Rndstr=Str
     'response.write Rndstr
end function