powerbuilder导出数据到Excel表

string str_savename,named
int  excelok,li_net
oleobject excelserver
excelserver=create oleobject 
excelok=excelserver.connecttonewobject("excel.application") 
//检查返回值,以确保已成功地连接到了Excel
if excelok <> 0 then 
 messagebox("信息提示","连接EXCEL失败,请检查计算机中是否安装了EXCEL!") 
  return
end if  
if GetFilesaveName("选择文件", str_savename,named,"xls","Excel文件(*.xls),*.xls") = 1 then
	dw_1.saveas(str_savename,excel!,true)<span style="white-space:pre">	</span>//dw_1为数据窗口
	messagebox('提示信息','导出成功!')
end if

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值