首页 > 代码库 > PB导出数据excel格式dw2xls

PB导出数据excel格式dw2xls

PB导出数据excel格式dw2xls

 使用DW2XLS控件

语法

uf_save_dw_as_excel ( dw, filename ) 

參数

dw A reference to the datawindow object
filename A string whose value is the name of the file you want to create. If filename is not on the operating system‘s search path, you must enter the fully qualified name. 

返回值

Integer. Returns 1 if it succeeds and -1 if an error occurs.

举例

integer li_retli_ret = uf_save_dw_as_excel(dw_1, ‘c:\doc\report.xls‘)if li_ret = 1 then   //success   //...else   //fail   //...end if



我的实际样例

 

首先 migrate dw2XLS

 

技术分享

界面

技术分享

相关代码

技术分享

导出结果

技术分享

 

还有相关的就是

 

uf_save_dw_as_excel_parm() function

Converts datawindow into excel file. Allows to specify some options for process of converting.

语法

uf_save_dw_as_excel_parm ( dw, filename, parm ) 

參数

dw A reference to the datawindow object
filename A string whose value is the name of the file you want to create. If filename is not on the operating system‘s search path, you must enter the fully qualified name 
parm A reference to the n_dwr_service_parm object which contain a set of parameters for process of converting

返回值

Integer. Returns 1 if it succeeds and -1 if an error occurs.

举例

 

//export using parametersinteger li_retn_dwr_service_parm lnvo_parmlnvo_parm = create n_dwr_service_parmlnvo_parm.ib_header = false         //skip header band 没有标题行lnvo_parm.ib_summary = false        //skip summary band lnvo_parm.ib_footer = false         //skip footer band lnvo_parm.ib_group_header = false   //skip all group headers lnvo_parm.ib_group_trailer = false  //skip all group trailers li_ret = uf_save_dw_as_excel_parm(dw_1, ‘c:\doc\report.xls‘, lnvo_parm)if li_ret = 1 then   //success   //...else   //fail   //...end if


以下这个没有測试成功,可能版本号不正确
is_header_text 没有这种方法

// adding a header to generated XLSinteger li_retn_dwr_service_parm lnvo_parmlnvo_parm = create n_dwr_service_parmlnvo_parm.is_header_text = "Report"lnvo_parm.ib_header_font_underline = Trueli_ret = uf_save_dw_as_excel_parm(dw_1, ‘c:\doc\report.xls‘, lnvo_parm)if li_ret = 1 then   //success   //...else   //fail   //...end if


 

PB导出数据excel格式dw2xls