Foxtable(狐表)用户栏目专家坐堂 → 关于专业报表的问题


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

主题:关于专业报表的问题

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/30 17:13:00 [显示全部帖子]

取决于你报表的大小。执行下面的代码,保存也很卡?

 

Dim fl As String = "c:\data\test.pdf"
Dim doc  As New PrintDoc
Dim ra As New prt.RenderArea
doc.PageSetting.Width = 150
doc.PageSetting.Height = 80
ra.Width = "Parent.Width"
ra.Height = "Parent.Height"
ra.Style.Borders.All = New prt.Linedef(5, Color.Red)
doc.Body.Children.Add(ra)
doc.SavePDF(fl) '保存为PDF文件
Dim Proc As New Process '打开PDF文件
Proc.File = fl
Proc.Start()


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/30 19:09:00 [显示全部帖子]

 如果太慢的话,那就尝试用多线程来做,让其慢慢生成。

 

 具体上传测试项目 http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78

 


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/31 10:22:00 [显示全部帖子]


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/31 11:13:00 [显示全部帖子]

数据量的问题,页数越多生成速度自然越慢。我测试10000万行六百多页,预览半分钟左右,savepdf几分钟。

 

如果是直接生成pdf,你可以直接操作pdf http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=70686&skin=0

 


 回到顶部