将datawindow另存为excel的问题,大虾请指教。。。

dxsyx 2003-09-04 10:23:34
datawindow里有好几个子datawindow,在将它另存为excel文件时,保存的是datawindow的datacolumn值。自己写脚本,在保存之前将子datawindow的值换为
datacolumn,但保存的还是displaycolumn,怎样能直接保存为displaycolumn。
核心脚本是:
dw_1.settransobject(sqlca)
dw_1.object.userid.dddw.datacolumn='name'
dw_1.accepttext()
if dw_1.saveas('',excel!,true)= -1 then return)

其中列userid是子datawindow,它的显示列是“name”,值列是“code”。
目的是将此datawindow另存为excel时,保存的是name。

高手请指点。。
...全文
22 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
qdzhanglian 2003-09-05
  • 打赏
  • 举报
回复
OLEObject ole_object , ole_workbooks
ole_object = CREATE OLEObject
ole_object.workbooks.add
ole_object.Visible = True
ole_workbooks = ole_object.Worksheets(1)
...
ole_workbooks.cells(行,列).value=子数据窗口的值
...
ole_object.quit()
Ole_Object.DisConnectObject()
Destroy Ole_Object
destroy ole_workbooks
zm1616 2003-09-05
  • 打赏
  • 举报
回复
用dw_1.SaveAsAscii()这个函数
dxsyx 2003-09-04
  • 打赏
  • 举报
回复
不是的。要保存整个datawindow的内容,里面有6个子datawindow,保存时excel需要显示所有的子datawindow的displaycolumn值。。
clj630 2003-09-04
  • 打赏
  • 举报
回复
你是想保存子窗口的内容吗,?如果是的话,if userid.saveas("",excel!,true)=-1 then return

609

社区成员

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

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