JavaScript中运用VBScript获得的数组

<script language="vbscript" src="../vbscript/GetRowGroup.vbs"></script>
    <script type="text/vbscript" language="vbscript">
    <!--  

'//获得周数组的VBScript方法 
     function getWeek()  
        '''定义周数组
        dim groupWeek()
        
        '''准备条件
        FlowYear=Trim(document.all("txtYear").value)      
        FlowQuarter=Trim(document.all("hdnQuarter").value)
        theStartDate=FlowYear&"-"&(1+(FlowQuarter-1)*3)&"-1 00:00:00"
        theEndDate=dateadd("d",-1,dateadd("m",3,theStartDate)) 
        
        '''利用../vbscript/GetRowGroup.vbs中GetRowGroup函数获得VB数组groupWeek
        GetRowGroup theStartDate, theEndDate, "qw", groupWeek   
        
        '''返回VB数组
        getWeek=groupWeek
      end function  

     //-->
     </script>   
    <script language="JavaScript">
    <!--
    //OnSelChange--SelectBox Change时触发
    function OnSelChange()
    {
        //重新定义js中VBArray
        var a = new VBArray(getWeek());
//        var arr = a.toArray(); //转换为JS Array

        //移除Select原有Options
        for(var i=document.all("selWeek").options.length-1;i>=0;--i)
        {
            document.all("selWeek").options.remove(i);           
        }    
        
        //重新添加Select Options
        for(i=1;i<=a.ubound(2);i++)
        {
//            alert(a.getItem(0,i));
            document.all("selWeek").add(new Option('第'+a.getItem(0,i)+'周',a.getItem(0,i),'')); //new Option(text,value,title)
        }
    }

    //-->
  </script>