Foxtable(狐表)用户栏目专家坐堂 → 我选择了6条记录,只有2条记录能全部读出到WORD报表


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

主题:我选择了6条记录,只有2条记录能全部读出到WORD报表

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


加好友 发短信
等级:婴狐 帖子:10 积分:136 威望:0 精华:0 注册:2014/12/11 5:18:00
我选择了6条记录,只有2条记录能全部读出到WORD报表  发帖心情 Post By:2014/12/13 16:43:00 [显示全部帖子]

Dim rs As List(of Row) = Tables("用户表").GetCheckedRows
If rs.Count > 0 Then '如果存在符合条件的行
    Dim tm As String  = ProjectPath & "Attachments\自愿申请表.doc" '指定模板文件
    Dim fl As String = ProjectPath & "Reports\申请表.doc" '指定目标文件
    Dim wrt As New WordReport(Tables("用户表"),tm,fl) '定义一个WordReport
    For Each r As Row In rs '逐行生成报表
        wrt.BuildOne(r)
    Next
    wrt.Show() '显示报表
End If

 

我选择了6条记录,只有2条记录能全部读出到WORD报表,从第三条开始,就只能读出部分记录到WORD报表?


 回到顶部
帅哥哟,离线,有人找我吗?
鄢炼
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:10 积分:136 威望:0 精华:0 注册:2014/12/11 5:18:00
  发帖心情 Post By:2014/12/13 16:51:00 [显示全部帖子]

附件为报表模板

 回到顶部
帅哥哟,离线,有人找我吗?
鄢炼
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:10 积分:136 威望:0 精华:0 注册:2014/12/11 5:18:00
  发帖心情 Post By:2014/12/13 16:52:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:自愿申请表.zip


 回到顶部
帅哥哟,离线,有人找我吗?
鄢炼
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:10 积分:136 威望:0 精华:0 注册:2014/12/11 5:18:00
  发帖心情 Post By:2014/12/13 16:56:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:申请表.zip

附件为生成报表后的文件。

 回到顶部
帅哥哟,离线,有人找我吗?
鄢炼
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:10 积分:136 威望:0 精华:0 注册:2014/12/11 5:18:00
  发帖心情 Post By:2014/12/14 10:14:00 [显示全部帖子]

我都写了几次了。。如果不行的话,为什么前两条记录又能读出来?后面的记录读不出来?


 回到顶部