刚刚写好的ASP生成随机数，很简单的不用我说大家也看的明白！由于我不经常用就不做成函数了！这是供新手学习用的，高手就略过吧！

<%

RANDOMIZE

dim jg(5)

jg(0) = ""

for r=0 to 5

 su = ""

 for i=0 to 2

  su = su & int((9+1)*rnd())

 next

 if su < 100 then

  r = r-1

 end if

 if su > 100 then

  for a=0 to r

   if su = jg(a) or su = "" then

    r = r-1

   end if

  next

  if r >= 0 then

   jg(r) = su

  end if

 end if

next

for e=0 to 4

 response.Write int("10000" & jg(e)) & "<hr>"

next

%>