读书人

dw2xls如何用

发布时间: 2012-06-10 14:03:15 作者: rapoo

dw2xls怎么用?
只有1个pbl
请问怎么调用

哪里有说明书啊

[解决办法]
参考一下:


integer value,li_FileNum
string pathname,filename,ls_filename,ls_null=''

getfilesavename("Saving Data",pathname,filename,"xls","Excel 文件(*.xls),*.xls")
ls_filename = pathname
if fileexists(pathname)=false then
li_FileNum = FileOpen(ls_filename)
FileWrite(li_fileNum,ls_null)
end if

n_dwr_service_parm lnvo_parm
n_dwr_service_excel lnvo_excel

lnvo_excel = create n_dwr_service_excel

lnvo_parm = create n_dwr_service_parm
lnvo_parm.ib_show_progress = true
lnvo_parm.is_version = '97'
lnvo_parm.ib_group_header = true

//Create Workbook
if lnvo_excel.of_create_wb(ls_filename, lnvo_parm) = 1 then

//Converting Datawindow to Sheet 1
lnvo_parm.is_sheet_name = 'First Sheet' //自己定义Sheet名字
lnvo_excel.of_save_dw2sheet(dw_1, lnvo_parm) //把dw_1导入到SHEET1

//Converting Datawindow to Sheet 2
lnvo_parm.is_sheet_name = 'Second Sheet'
lnvo_excel.of_save_dw2sheet(dw_2, lnvo_parm) //把dw_2导入到SHEET2

//Close Workbook
lnvo_excel.of_close_wb()
end if
[解决办法]
加这个PBL加入项目中
就一个函数就可以了
DW什么样就导出什么样的excel

uf_save_dw_as_excel(dw_1, 'c:\xx.xls')
[解决办法]

探讨
加这个PBL加入项目中
就一个函数就可以了
DW什么样就导出什么样的excel

uf_save_dw_as_excel(dw_1, 'c:\xx.xls')

[解决办法]
同意楼上,直接写调用函数就行了
[解决办法]
dw2xls 好熟悉的pbl名字啊,莫非楼主是深圳工作?

读书人网 >PB

热点推荐