Foxtable(狐表)用户栏目专家坐堂 → [求助]关于表分页加载后输出报表及打印问题


  共有2800人关注过本帖树形打印复制链接

主题:[求助]关于表分页加载后输出报表及打印问题

帅哥哟,离线,有人找我吗?
Hyphen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/9/1 21:55:00 [显示全部帖子]

With DataTables("装备数据库")
    .LoadTop = "100 Percent"
    .Load()
End With

Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")
Dim fl As String = ProjectPath & "Reports\出库单.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()

With DataTables("装备数据库")
    .LoadTop = 20
    .LoadPage = 0
    .Load()
End With

 回到顶部