一个数组问题，解决后一定给分！

[shanjimail]

功能实现取随机数，要求个不相同，我是先把已取的放在一个数组里，然后每取一个检查一下看有没有已经取过！
看下面代码:
set rs1=server.createobject("ADODB.Recordset")
sql2="SELECT * FROM EIS_stud_info where classno='"&rs("classno")&"' order by classno,c_stud_xuehao"
rs1.Open sql2,conn,3,3
if not rs1.eof then
total=rs1.recordcount
do while not rs1.eof
j=int((cint(total))*rnd+1)
a()=j
do while instr(1,a(),"j")<>0
j=int((cint(total))*rnd+1)
loop
sql1="insert into eis_kaochang(c_stud_no,c_stud_name,kc,zw) values('"&rs1("c_stud_no")&"','"&rs1("c_stud_name")&"','"&subject&"',"&j&")"
conn.execute(sql1)

rs1.movenext
loop
end if
rs1.close

[renniliao]

你的数组是怎么定义的？你使用数组为什么不用下标？这不对！

[postform999]

re

[萝卜波]

代码很乱阿

a()=j' 这样的code肯定有错误的哦