如何导出datewindow中datails区的合计信息?

yiepeng 2005-04-20 03:15:45
我做了个自定义函数,可以导出中文,但datails区的合计信息不能导出,请大家帮助看一下。

//可以先将标题改为中文再导出,一个grid的例子
//datawindow->Excel中文标题函数;参数datawindow ad_dw
//自宝义函数uf_dwtoexcel,无返回值。
string str_objects,str_object,str_column,str_add
long lng_pos,i

//str_add=ad_dw.Describe("DataWindow.Objects")+'~t'
str_objects=ad_dw.Describe("DataWindow.Objects")+'~t'
lng_pos=pos(str_objects,"~t")


i=1
do while lng_pos>0
str_object=left(str_objects,lng_pos - 1)//各个对象的名称
str_objects=mid(str_objects,lng_pos + 1)
lng_pos=pos(str_objects,"~t")
//细节区中的列对象及计算域
if ad_dw.describe(str_object+".band")='detail' and (ad_dw.describe(str_object+".type")='column' or ad_dw.describe(str_object+".type")='compute') and ad_dw.describe(str_object+".width")>'0' and ad_dw.describe(str_object+".visible")<>'false' then
str_column=ad_dw.describe(str_object+'_t.text')//列中文标题
ad_dw.Modify(str_object+".dbName='"+str_column+"'")
end if
loop

integer value

value = ad_dw.saveas("",Excel!,TRUE)
IF value = 1 THEN
messagebox('提示!','数据导出成功!')
else
messagebox('提示!','数据导出失败!')
end if
...全文
38 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复

609

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder DataWindow
社区管理员
  • DataWindow社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧