不行哦,你的VBScript是先执行的
JavaScript后执行,也就是说执行VBScript的时候i还没出生呢
你可以在VBScript里执行循环

解决方案 »

  1.   

    我曾经做过从数据库里面随即取得10条名人名言,作为数据输出到前端的
    <script language="JavaScript"></script>里面。然后用函数在前端动态的轮流显示数组里面的内容。
    就是:
    <script language="JavaScript">
    var array_0=new Array();
    <%
    建立数据连接,
    读取数据库所需内容到 rs 中
    for i=0 to 9
       response.Write("array_0["&i&"]='"&rs("所需字段")&"';") 
    next
    %>
    //
    //之后的前端js代码就可以使用 你在vb中后台填充内容后的数组了</script>
    ------------------
    原具体代码如下:
    看你有没有帮助
    <script language="JavaScript">
    //随机选择10条名言,生成10个数组,每条名言最多有3行
    <%
    set rs=server.CreateObject("ADODB.RecordSet")
    rs.Source="select * from logion where  class="&l_class
    rs.Open rs.Source,conn,3,1
    for i=0 to 9
    Randomize
    rnd_no=int(rnd()*rs.recordcount)
    rs.move rnd_no,1
    response.Write("var array"&i&"=new Array();")
    response.Write("array"&i&"[0]='"&rs("source")&"';")
    for ii=2 to 4
    if  (not isnull(rs(ii)) )and rs(ii)<>""  then
    response.Write("array"&i&"["&ii-1&"]='"&rs(ii)&"';")
    end if
    next
    next  
    set rs =nothing
    set conn =nothing
    %>
    </script>