AX2009使用NPOI导出EXCEL2007

既然说到NPOI可以导出2007版本的EXCEL，那就随便也介绍一下如何导出

其实2007版本的EXCEL也并不神秘，将xlsx扩展名修改成zip，然后再打开就很清楚了，简单来说就是一堆的xml文件通过zip压缩，修改扩展名为xlsx就是2007版本的excel了

所以要生成2007版本的excel，就需要添加操作xml和zip的类

将下载得到的DLL文件共5个，还有1个XML文件复制到AX的客户端安装目录BIN下，DLL文件全部添加引用

 

添加完成就可以开始使用了

整个调用方法跟2003版本几乎一致，就是初始化workbook时使用的2007版本的class（红色部分）

static void NPOI_ExportExcel2007(Args _args)
{
    System.IO.FileStream                file;
    NPOI.XSSF.UserModel.XSSFWorkbook    workBook= new NPOI.XSSF.UserModel.XSSFWorkbook();
    NPOI.SS.UserModel.ISheet            sheet=workBook.CreateSheet("NPOISheet");
    NPOI.SS.UserModel.IRow              row;
    NPOI.SS.UserModel.ICell             cell;

    InventTable                         inventTable;
    SysDictTable                        dictTable = new SysDictTable(inventTable.TableId);
    SysDictField                        dictField;
    FieldId                             fieldId;
    int                                 i,j,k,t;
    str                                 fieldValue;
    Types                               a;
    ;
    t=timenow();
    while select inventTable
    {
        row=sheet.CreateRow(i);
        for(j=1;j<dictTable.fieldCnt();j++)
        {
            cell=row.CreateCell(j-1);
            fieldId=dictTable.fieldCnt2Id(j);
            a=typeof(inventTable.(fieldId));
            dictField=dictTable.fieldObject(fieldId);
            if(a!=types::BLOB && a!=types::Class && a!=types::Container && a!=types::void && a!=types::Record)
            {
                for(k=1;k<=dictField.arraySize();k++)
                    fieldValue=queryvalue(inventTable.(fieldId2Ext(fieldId,k)));

            }
            cell.SetCellValue(fieldValue);
        }
        i++;
    }

    file =new System.IO.FileStream("D:\test.xlsx", System.IO.FileMode::Create,System.IO.FileAccess::ReadWrite);
    workBook.Write(file);
    file.Close();
    info("export2007 use time:"+int2str(timenow()-t)+"s");
}

 最终导出时间比2003版本多1秒，但文件大小是2003版本的1/4