用java创建不行吗,我没有听说过Excel可以用脚本创建的。

解决方案 »

  1.   

    /**
     * 名称 : createExcel
     * 功能 : 生成记录结果集Excel文件
     */
    function createExcel()
    {
    //保存标题名称
    var arrTitle = new Array();
    arrTitle[0] = "A";
    arrTitle[1] = "B";
    arrTitle[2] = "C";
    arrTitle[3] = "D";
    arrTitle[4] = "E";
    arrTitle[5] = "F";
    arrTitle[6] = "G";
    arrTitle[7] = "H";
    arrTitle[8] = "I";
    arrTitle[9] = "J";
    arrTitle[10] = "K";
    arrTitle[11] = "L";
    arrTitle[12] = "M";
    arrTitle[13] = "N";
    arrTitle[14] = "O";
    arrTitle[15] = "P";
    arrTitle[16] = "Q";
    arrTitle[17] = "R";
    arrTitle[18] = "S";
    arrTitle[19] = "T";
    arrTitle[20] = "U";
    arrTitle[21] = "V";
    arrTitle[22] = "W";
    arrTitle[23] = "X";
    arrTitle[24] = "Y";
    arrTitle[25] = "Z";

    //保存字段名称
    var arrField = new Array();
    var strField = new String();
    strField = document.Excel.txtField.value;
    arrField = strField.split(',');

    //保存记录总数
    var rowCount = parseInt('<%#dt.Rows.Count%>');

    //保存记录结果集
    var aRS = new Array();
    //保存当前记录行数
    var index = 0;

    <%
    for(int i=0; i<dt.Rows.Count; i++){
    %>
    aRS[index] = new Array();
    var column = 0;
    <%
    for(int j=0; j<dt.Columns.Count; j++){
    %>
    aRS[index][column] = "<%=dt.Rows[i][j]%>";
    column++;
    <%
    }
    %>
    index++;
    <%
    }
    %>

    //建立Excel应用程序oXL
    var oXL = new ActiveXObject("Excel.Application");
    //设置可见性
    oXL.Visible = true;
    //建立工作薄oWB
    var oWB = oXL.Workbooks.Add();
    //得到当前工作表
    var oSheet = oWB.ActiveSheet;
    //设置列的宽度
    oSheet.Range("A1:Z1").ColumnWidth = 15.00;
    //创建单元格对象
    var rTitle = oSheet.Range("A1:Z1");
    //水平中间对齐
    rTitle.HorizontalAlignment = 3;

    //显示标题信息
    for(var i=0; i<arrField.length; i++)
    {
    var T = arrTitle[i];
    oSheet.Range(T+"1").Value = arrField[i];
    oSheet.Range(T+"1").BorderAround(LineStyle=1);
    } oXL.StatusBar = "现在正在生成,请等待...";

    //显示记录信息
    for(var i=0; i<aRS.length; i++)
    {
    for(var j=0; j<arrField.length; j++)
    {
    var T = arrTitle[j];
    oSheet.Range(T+(i+2)).Value = "'" + aRS[i][j].toString();
    oSheet.Range(T+(i+2)).BorderAround(LineStyle=1);
    }
    }

    oXL.StatusBar = "报表已经生成完毕.";
    }
      

  2.   

    是一个后台服务程序,在后台新建一个EXCEL文件,将几个固定数据放入EXCEL文件中,并保存文件即可.
      

  3.   

    将网页存成html(可用FSO)
    然后由Excel打开
    然后操纵Excel存为Excel格式的