谁能帮我编写一个vbscript脚本 实现从1000个数字中随机抽取100个不重复数字,改代码本人准备用于asp中

2024-11-15 20:55:13
推荐回答(2个)
回答1:

s=" "
i=0
do while i<1000
k=int(rnd*1000)
if instr(s," " & k & " ")=0 then
s=s & k & " "
i=i+1
end if
loop
ss=split(trim(s)," ")

ss()数组就是从0-999中随机抽取的100个不重复的数字

回答2:

rnd
arr()