JS web服务返回数组

JS================================================

function ArrayListType()
 {   
    // 取得用户所选取的部门。
    department = DepartmentListBox.options[DepartmentListBox.selectedIndex].value;  
   
    // 调用 Web 服务的 GetArrayList 方法并将用户所选取的部门传递给它。         
    WS_HandleGenerics.GetArrayList(department);
 }
 function pageLoad()
{
    displayResult =
        document.getElementById("ResultId");
       
     // 取得选取部门的 ListBox 服务器设置。
    DepartmentListBox = $get('DepartmentDropDownList');
   
    if (DepartmentListBox)
    {
      // 取得用户所选取的部门。
      department = DepartmentListBox.options[DepartmentListBox.selectedIndex].value;
    }       

    //控件用户内容。
    WS_HandleGenerics.set_defaultUserContext("章立民研究室");
   
    // 指定成功回调函数。
    WS_HandleGenerics.set_defaultSucceededCallback(SucceededCallback);
   
    // 指定失败回调函数。   
    WS_HandleGenerics.set_defaultFailedCallback(FailedCallback);
 }

=============================webserivce============

    <WebMethod()> _
    Public Function GetArrayList(ByVal department As String) As ArrayList

        ' 初始化 ArrayList 物件。
        Dim myArrayList As New ArrayList()

        ' 建立一个 DataContext 对象。
        Dim db As chtNorthwindDataContext = New chtNorthwindDataContext()

        ' 从「章立民研究室」数据表提取字段内容。
        Dim result = From limingchstudio In db.章立民研究室 _
                     Where limingchstudio.部门 = department _
                     Select limingchstudio.姓名, limingchstudio.性别, limingchstudio.地址

        For Each employee In result
            myArrayList.Add("姓名：" + employee.姓名)
            myArrayList.Add("性别：" + employee.性别)
            myArrayList.Add("地址：" + employee.地址)
        Next

        Return myArrayList

    End Function