Question

sql查询记录建立ASP数组

我想实现这样的功能：
从SQL里读取记录生成一个数组
把数组的值传递给JS数组
请问怎么实现？
<%
sql = "select answer from question where tixingid = 3"
set rs = server.CreateObject("adodb.recordset")
rs.open sql,connbbs,1,1
Dim a() '定义a数组
Dim l
l = 0
While Not Rs.EOF
ReDim Preserve a(0 To l) '重定义数组大小
a(l) = Rs("answer") '保存新数据
l = l + 1
Rs.MoveNext
Wend
rs.close
set rs = nothing
%>
ASP代码是这样的，但是总是提示有错误：
----------------------
Microsoft VBScript 编译器错误 错误 '800a03ee'
缺少 ')'
/exam.asp，行 22
ReDim Preserve a(0 To l) '重定义数组大小
-----------------------
JS里我是这样写的，对吗？
-----------------------
var arr1=new array();
arr1 = <%=a(l)%>;
-----------------------

Answer 1

<script type="text/javascript">
var arr1=new array();

<%
sql = "select answer from question where tixingid = 3"
set rs = server.CreateObject("adodb.recordset")
rs.open sql,connbbs,1,1
Dim a() '定义a数组
Dim l
l = 0
While Not Rs.EOF
%>

arr1 =<%= Rs("answer")%> //保存新数据
<%

Rs.MoveNext
Wend
rs.close
set rs = nothing
%>
</script>

追问

我试了你的代码，输出结果是下面这样：
arr1 =B;

arr1 =A;

arr1 =A;

arr1 =B;

arr1 =A;

arr1 =B;

arr1 =B;

arr1 =A;

arr1 =B;

这样对吗?不是数组的样式啊，这样好像是把一个数组的值通过循环列出来了吧

追答

var arr1=new array();

arr1[I] = //保存新数据

Answer 2

var arr1=new array();
arr1 = <%=a(l)%>;
其中
arr1 = a(l);

追问

var arr1=new array();
arr1 = a(l);
function xz(){
for (i=0;i<=a(l).length;i++){
alert(arr1(i));
}
}
按你说的改了，但是输出时没有反应，什么都不显示，我这样写对吗？

追答

我看错了 arr1 = ; 是对的

Answer 3

ReDim Preserve a(0 To l) 在asp中语法错误
ReDim Preserve a(l) 即可，重定义数组大小的同时保存原数组内容