Foxtable(狐表)用户栏目专家坐堂 → [求助]一个模板生成多个报表的信息不全


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

主题:[求助]一个模板生成多个报表的信息不全

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


加好友 发短信
等级:婴狐 帖子:30 积分:332 威望:0 精华:0 注册:2013/3/12 15:22:00
[求助]一个模板生成多个报表的信息不全  发帖心情 Post By:2015/6/23 9:44:00 [显示全部帖子]

报表很简单的,但是不知道为什么前面几个正常显示,后面的考生姓名就不显示了。。。

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20150623095523.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:婴狐 帖子:30 积分:332 威望:0 精华:0 注册:2013/3/12 15:22:00
  发帖心情 Post By:2015/6/23 10:00:00 [显示全部帖子]

红框里显示的应该是学生姓名,但实际显示的是[考生姓名]

前几个都是正常的,后面的有的学生姓名不显示,有的性别不显示,等等等等吧
[此贴子已经被作者于2015/6/23 10:01:12编辑过]

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


加好友 发短信
等级:婴狐 帖子:30 积分:332 威望:0 精华:0 注册:2013/3/12 15:22:00
  发帖心情 Post By:2015/6/23 10:13:00 [显示全部帖子]

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


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


加好友 发短信
等级:婴狐 帖子:30 积分:332 威望:0 精华:0 注册:2013/3/12 15:22:00
  发帖心情 Post By:2015/6/23 10:13:00 [显示全部帖子]

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


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


加好友 发短信
等级:婴狐 帖子:30 积分:332 威望:0 精华:0 注册:2013/3/12 15:22:00
  发帖心情 Post By:2015/6/23 10:16:00 [显示全部帖子]

显示的是这个,第四页往后就不对了

 回到顶部
帅哥哟,离线,有人找我吗?
链锁孤舟
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:30 积分:332 威望:0 精华:0 注册:2013/3/12 15:22:00
  发帖心情 Post By:2015/6/23 10:25:00 [显示全部帖子]

单个的没有问题,全选之后显示就不对了。

 回到顶部
帅哥哟,离线,有人找我吗?
链锁孤舟
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:30 积分:332 威望:0 精华:0 注册:2013/3/12 15:22:00
  发帖心情 Post By:2015/6/23 10:27:00 [显示全部帖子]

哪里是全部打印啊?不是全选么?

 回到顶部
帅哥哟,离线,有人找我吗?
链锁孤舟
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:30 积分:332 威望:0 精华:0 注册:2013/3/12 15:22:00
  发帖心情 Post By:2015/6/23 10:53:00 [显示全部帖子]

Dim tm As String  = ProjectPath & "Attachments\附件3少数民族考生审核表.docx" '指定模板文件
Dim fl As String = ProjectPath & "Reports\附件3少数民族考生审核表.docx" '指定目标文件
Dim wrt As New WordReport(Tables("审核表"),tm,fl) '定义一个WordReport
wrt.Build() '逐行生成报表
wrt.Show() '显示报表

是这个么?
只显示一条报表啊。。。。

 回到顶部
帅哥哟,离线,有人找我吗?
链锁孤舟
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:30 积分:332 威望:0 精华:0 注册:2013/3/12 15:22:00
  发帖心情 Post By:2015/6/23 11:19:00 [显示全部帖子]

还是不行啊。。。
Dim drs As List(of DataRow) = DataTables("审核表").Select("") '筛选出符合条件的行
If drs.Count > 0 Then '如果存在符合条件的行
    Dim tm As String  = ProjectPath & "Attachments\附件3少数民族考生审核表.docx" '指定模板文件
    Dim fl As String = ProjectPath & "Reports\附件3少数民族考生审核表.docx" '指定目标文件
    Dim wrt As New WordReport(Tables("审核表"),tm,fl) '定义一个WordReport
    For Each dr As DataRow In drs '逐行生成报表
        wrt.BuildOne(dr)
    Next
    wrt.Show() '显示报表
End If

 回到顶部
帅哥哟,离线,有人找我吗?
链锁孤舟
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:30 积分:332 威望:0 精华:0 注册:2013/3/12 15:22:00
  发帖心情 Post By:2015/6/23 11:20:00 [显示全部帖子]

生成的报表还是显示不全,什么情况???

 回到顶部
总数 15 1 2 下一页