关于如何加入徇环语句的问题，在线等待

<%
showChart Array(1,2,3,4,5,6,7,8,9,0), _z
Array("P1", "P2", "P3", "P4", "P5", "P6", "P7", "P8", "P9", _
"P10", "P11", "P12", "P13"), "连续几个月的销售额", "X 轴", "Y 轴"
Response.Write "<BR>" & vbCrLf
Response.Write "<BR>" & vbCrLf
Response.Write "<BR>" & vbCrLf
Dim I
Dim aTemp(49)
Randomize
For I = 0 to 49
aTemp(I) = Int((50 + 1) * Rnd)
Next 'I
ShowChart aTemp, "这不是一个数组!", "随机条形图", "序号 ", "随机数"
%>这想把这段代码前面的()里的1,2,3,4.....,9,0 换成一个徇环语句，徇环显示数据库中的值，我把那个值设成变量如u1=rs("datajz"&",") 也就是u1，可是我不知道怎么把徇环语句加入()中，请问大家谁知道怎么加呢？
在线等待！多谢！