611
社区成员
发帖
与我相关
我的任务
分享数据窗口怎样连表头一块保存为Excel格式？
数据窗口怎样连表头一块保存为Excel格式？且数据窗口中visible为0的列在Excel中也不显示。
...全文
请发表友善的回复…
发表回复
szpqq 2003-07-11
- 打赏
- 举报
string docname, named
integer value
if dw_print.rowcount()<1 then return
value = GetFileSaveName("Select File", &
docname, named, "DOC", &
"Text Files (*.TXT),*.TXT," + &
" Doc Files (*.DOC), *.DOC,"+" Excel Files (*.XLS), *.XLS,"+&
" DBF Files (*.DBF), *.DBF")
IF value = 1 THEN
dw_print.SaveAsAscii(docname)
end if
integer value
if dw_print.rowcount()<1 then return
value = GetFileSaveName("Select File", &
docname, named, "DOC", &
"Text Files (*.TXT),*.TXT," + &
" Doc Files (*.DOC), *.DOC,"+" Excel Files (*.XLS), *.XLS,"+&
" DBF Files (*.DBF), *.DBF")
IF value = 1 THEN
dw_print.SaveAsAscii(docname)
end if
albert_qingdao 2003-07-11
- 打赏
- 举报
我有一个自己做的东东，如果需要清联系我QQ:15187138
yoshiki 2003-07-11
- 打赏
- 举报
用ole
takeiteasy 2003-07-11
- 打赏
- 举报
SaveAsAscII可以吗？
是不是可以用更好的办法，先保存出来，
然后把文件的第一行替换掉不就行了。当然比较麻烦倒是真的。
是不是可以用更好的办法，先保存出来，
然后把文件的第一行替换掉不就行了。当然比较麻烦倒是真的。
galiton 2003-07-11
- 打赏
- 举报
学习
