【经验总结】 怎样从Axapta中导出数据到Excel。

 //[原创][经验总结] 怎样从Axapta中导出数据到Excel。 static void xyf_ExcelOf_FormAxapta(Args _args) { SysExcelApplication excel; SysExcelWorkbooks books; SysExcelWorkbook book; SysExcelWorksheets sheets; SysExcelWorksheet sheet; SysExcelRange columns; SysExcelRange column; SysExcelCells cells; SysExcelCell cell; InventTable IT; int i,j; ; excel = SysExcelApplication::construct(); books = excel.workbooks(); book = books.add(); Sheets = book.worksheets(); sheet = sheets.itemFromNum(1); sheet.name('ExcelTitleName'); try { while select it where it.ItemGroupId == 'a' { j = 1; i ++; sheet.cells().item(i,j).value(it.ItemId); j++; sheet.cells().item(i,j).value(IT.ItemGroupId); j++; sheet.cells().item(i,j).value(it.CSM_CustomItemId); j++; sheet.cells().item(i,j).value(It.NameAlias); } } catch (Exception::Error) { excel.quit(); throw Error(strfmt("%1",Exception::Internal)); } excel.visible(true); excel.quit(); }