Foxtable(狐表)用户栏目专家坐堂 → [求助]点击打印预览后的打印按钮后,纸张变了


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

主题:[求助]点击打印预览后的打印按钮后,纸张变了

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


加好友 发短信
等级:童狐 帖子:292 积分:1791 威望:0 精华:0 注册:2015/1/31 23:19:00
[求助]点击打印预览后的打印按钮后,纸张变了  发帖心情 Post By:2019/1/29 16:28:00 [只看该作者]

Dim doc As New PrintDoc
With doc.PageSetting
    .LeftMargin = 1
    .RightMargin = 1
    .BottomMargin = 1
    .TopMargin = 1
    .Width = 217 
    .Height = 165  
End With
‘中间是一串报表组织代码
Doc.Preview() '预览报表


代码如上,设置了纸张的大小为:21.7*16.5CM,预览都正常,但点了预览上的打印按钮后,整体纸张都变了,好像是变成A4,然后打出来全乱套。
麻烦版主帮助,分析下原因,谢谢!


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


加好友 发短信
等级:童狐 帖子:292 积分:1791 威望:0 精华:0 注册:2015/1/31 23:19:00
  发帖心情 Post By:2019/1/29 16:33:00 [只看该作者]

打印前和打印后的图片:
...
无法上传附件,点添加附件没反应。。。
[此贴子已经被作者于2019/1/29 16:34:34编辑过]

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


加好友 发短信
等级:超级版主 帖子:37553 积分:191021 威望:0 精华:8 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/1/29 20:09:00 [只看该作者]

不要在预览里点击打印,这个确实是有问题的。做2个按钮,预览和打印分开
[此贴子已经被作者于2019/1/29 20:08:54编辑过]

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


加好友 发短信
等级:童狐 帖子:292 积分:1791 威望:0 精华:0 注册:2015/1/31 23:19:00
  发帖心情 Post By:2019/1/30 16:09:00 [只看该作者]

是否:【打印】按钮的代码就是直接打印,不预览?

Doc.Print() '直接打印

这样就可以吗?

——
改了代码,直接使用doc.print(),打印出来依然会变大,并没有按我的要求大小打印。
[此贴子已经被作者于2019/1/30 16:14:43编辑过]

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


加好友 发短信
等级:超级版主 帖子:37553 积分:191021 威望:0 精华:8 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/1/30 17:41:00 [只看该作者]

纸张应该是超过打印机的打印范围了,把纸张缩小测试

 回到顶部
帅哥哟,离线,有人找我吗?
蓝才文百
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:292 积分:1791 威望:0 精华:0 注册:2015/1/31 23:19:00
  发帖心情 Post By:2019/1/30 18:35:00 [只看该作者]

缩小了纸张也一样,当点打印按钮后,纸张自动变了。和之前这位用户说的情况一模一样:


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


加好友 发短信
等级:版主 帖子:85329 积分:427820 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/1/30 21:29:00 [只看该作者]

那就手动添加纸张,然后使用纸张

 

http://www.foxtable.com/webhelp/scr/2904.htm

 


 回到顶部
帅哥哟,离线,有人找我吗?
蓝才文百
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:292 积分:1791 威望:0 精华:0 注册:2015/1/31 23:19:00
  发帖心情 Post By:2019/2/11 9:52:00 [只看该作者]

按上述重新设置了纸张,打印导出又变成竖的了。
doc设置代码:(不知为何无法上传图片,采用外接图片)
图片点击可在新窗口打开查看

默认打印机的纸张,设置了纸张的大小:
图片点击可在新窗口打开查看

打印预览是这样,正常:
图片点击可在新窗口打开查看

点打印按钮后,生成的文件乱了,变成了竖显示,我已经代码禁止自动旋转。 Doc.AutoRotate = False
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
蓝才文百
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:292 积分:1791 威望:0 精华:0 注册:2015/1/31 23:19:00
  发帖心情 Post By:2019/2/11 9:56:00 [只看该作者]

上面,纸张大小,代码中,原来设置217(和纸张一致),按版主意见,改小为 213 也是一样打印变竖

 回到顶部
帅哥哟,离线,有人找我吗?
蓝才文百
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:292 积分:1791 威望:0 精华:0 注册:2015/1/31 23:19:00
  发帖心情 Post By:2019/2/11 10:00:00 [只看该作者]

在打印预览界面,如果点保存按钮,生成pdf,再打印,就可以,不会变竖。
[此贴子已经被作者于2019/2/11 10:01:07编辑过]

 回到顶部
总数 27 1 2 3 下一页