pb快速导出excel

时间：2012-03-08 09:32:08
【文件属性】：

文件名称：pb快速导出excel

文件大小：1KB

文件格式：TXT

更新时间：2012-03-08 09:32:08

pb 快速 导出excel

测试过 7W多条100列只要不到5S excelserver.Workbooks.Open(ls_path)//打开 //ExcelServer.ActiveSheet.rows(2).insert //显示数据库列名时启用 ll_colnum = long(dw_1.Describe("DataWindow.Column.Count")) FOR i = 1 TO Ll_ColNum // 得到写入列标题头的名字 ls_colName = dw_1.Describe('#' + STRING(i) + ".name") + "_t" ls_value = dw_1.Describe(ls_colName + ".text") excelserver.ActiveSheet.cells(1,i).value = ls_value //ExcelServer.ActiveSheet.cells(2,i).value = ls_value//显示数据库列名时启用 excelserver.Application.Visible = TRUE NEXT

立即下载

网友评论

  • saveas然后修改了一下表头。
  • 方式可行，但是代码太简单，还要这么多分
  • 还可以，就是要的积分有点多
  • 不太好用，这么点代码要这么多积分！！！
  • 对于格式处理，如合并单元格，以及数字需要改进，
  • 非常实用啊，经典的 。。
  • 可以导出，但是导出桌面之后程序的图片全看不见
  • 上述程序避免不了因特殊字符乱码或者字段格式不正确的问题吧
  • 效果还可以，谢谢
  • 下载用了，还有有些缺陷 需要改进
  • 对于格式处理，如合并单元格，以及数字需要改进，
  • 同感，基础差了，反正没整好
  • 基础差了，不会用~
  • 不是很好用啊，格式奇怪！
  • 速度是很快，但是数字不能为文本格式，比如01234，导出后变成1234.
  • 非常实用，很经典
  • 用过了 挺快，可惜组合的字段列表显示不了！
  • 导出的方法很好，比我之前用的方式好多了。
  • 很好很强大，导出速度很快
  • 让我又学到一种导出方法，但是我需要的是PB在导出的Excel文件的列名是中文，现已经解决， 还是谢谢楼主的分享。
  • 效果还可以的。
  • 导出的格式有点奇怪

相关文章