将pb数据窗口的内容另存为Excel格式？
我尝试过用saveas函数来做，但是效果不理想，而且数据窗口的表头部分存到Excel表格中不是header带中出现的中文，听说用ole来做效果会很好，表格出来也会漂亮，所以想求助各位大侠，有没有这方面的代码参考一下，最好有些注释，拜托啦~~~
多谢大侠，我现在的环境有些问题，可否麻烦一下，把源码打个包发到偶邮箱里面去啊，我很想马上看到代码，谢谢啦~~
OLEObject ExcelServer
ExcelServer = create OLEObject
int li_ok
string ls_path,ls_file
li_ok=excelserver.connecttonewobject("excel.application")
getfileopenname("打开文件",ls_path,ls_file,"excel","excel文件,*.xls")
excelserver.workbooks.open(ls_path)
excelserver.activesheet.cells(i,li_y).value=值
PB中如何将数据窗口中的数据导出成excel表,就是添加导出控件中的代码该...
★filename：可选参数，string类型，其值是用于保存数据窗口内容的文件的文件名。如果省略了filename参数或filename参数的值为空字符串（""），程序运行时，PowerBuilder将显示一个对话框，让用户输入或选择文件名。★saveastype：可选参数，SaveAsType枚举数据类型，用于指定以何种方式保存数据窗口中的数据。
在PB中,把数据窗口导入到excel
第一个，导出的问题，可以通过数据窗口来完成，你把数据窗口的查询语法设置为从两个表查询就行了。然后使用数据窗口的saveas函数，保存为xls格式，就导出到excel中了。另外也可以通过DB画板，在ISQL SESSION页里面自己写查询语句，查询出结果后，然后在查询出结果的地方点右键选择save rows as...，然后...
将pb数据窗口的内容另存为Excel格式?
ExcelServer = create OLEObject int li_ok string ls_path,ls_file li_ok=excelserver.connecttonewobject("excel.application")getfileopenname("打开文件",ls_path,ls_file,"excel","excel文件,*.xls")excelserver.workbooks.open(ls_path)excelserver.activesheet.cells(i,li_y).value=值 ...
如何将pb查询结果自动存为excel文档
如果只是保存数据使用saveas()函数即可，如果要保存格式，找一个叫dw2xls的pbl库，直接调用方法就行了。
PB中导出EXCEL请教!
复制下面的代码，粘贴到记事本里，另存为f_pbtoexcel.srf 打开你的程序，展开System tree，在library图标上右击，点击import。将刚才的f_pbtoexcel.srf导进来。用法：双击按钮，然后在按钮的click事件里输入 f_pbtoexcel(dw_1) 即可，其中dw_1是数据窗口的名称。global type f_pbtoexcel from ...
如何在PowerBuilder 9.0中把当前数据窗口数据保存为excel文档...
ls_tempfilename = "temp_excel" + String( Today( ), 'yyyymmddhhmmssfff' )IF ad_dw.SaveAsAscii ( ls_tempfilename, "~t", "") = -1 THEN MessageBox("提示信息", "导出数据出错. 不能写入文件 !", Exclamation!)RETURN 0 END IF \/\/ 去掉行间隔 Integer li_FileNum, li...
pb另存为
写一个函数可以解决 代码如下：string pname,fname getfilesavename('保存文件',pname,fname,'xls','xls files (*.xls),*.xls')SaveAs(ai_dw, fname, excel!, false)\/\/保存为excel格式 其中ai_dw为参数。类型是datawindow.如果需要保存为其他格式，你可以把代码修改一下就可以了！
pb如何将库表数据写入到excel里
return \/\/操作第一个excel文件 string ls_file3="C:\\mytest.xls"obook3=xlApp.Application.Workbooks.Open(ls_file3) \/\/打开文件 xlsub4 = xlapp.Application.ActiveWorkbook.Worksheets[1] \/\/激活第一页 \/\/对单元格赋值 xlsub4.cells[c,3].Value = string(mydata.getitemdecimal(r,'rs'))...
pb 导出到excel问题
你有这样的想法非常好。我在这告诉你，那是可行的！你可以用Excel中“宏”中有功能，建立与其他软件连接，你可以按提示去操作，我想你一定会做出来的。当然还有其他方法 参考资料：常识
如何使用pb做动态数据窗口,并保存出excel,保存出excel我能实现。_百...
在窗体上新建一数据窗口，不要指定DATAOBJECT，再建一个CB按钮，clicked事件中写入如下代码：运行即可 string us_code=""string lsdwsyntax,lsdwsyntax2 string lserr string lssqlstr string lserrc long k=1 lssqlstr="select * FROM 表名(视图名)"\/\/select * FROM 表名(视图名) 你根据你的...
