主题：自定义纸张预览后打印方向就不正确了(基本解决)

 既然这样，就没办法了。两者只能择其一。

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=14873&skin=0

 

原来很早就有人反映过这个问题，但是怎么到现在都没解决呢？

客户用的是爱普生针式连续打印机，因为用的是215X140mm的自定义纸张，现在如果预览后再打印就会不正确了，如果不预览下，多页连续打印时有时因为内容刚好多一点因为不能预览也不知道，导致每一页的后面都会增多只有一点点内容的另一页，造成了大量的浪费和不美观，如果可以用预览再打印的话用户可以人为的将行高或字体调整小点就避免了这个问题。  这个有没有办法解决啊，请教大家。谢谢了！

这个纸张设置 是必须直接打印才能正确,预览无效,很早前我就提出了

是啊，但是不预览经常会出现我说的那个问题，用户很多表单都是这一种自定义的纸张，有没有办法解决呢？

 

暂时应该是没有办法的，你可以分开预览和打印两个按钮。保持设置一直。

不太明白有点甜老师的意思，分开两个按钮设置，难道用户先按预览按钮预览后先关掉；再重新按打印按钮打印吗？因为预览后是界面上有个打印按钮用户直接点击就打印了。预览那个界面可以增加上用户自己设定的按钮吗？

 呵呵，那就真的没有办法了。最多能这样：把报表 savePDF或saveHtm，然后用把文件显示出来，当是预览。

谢谢，能这样曲线解决也好，总之比没有强，就是麻烦点。

在自己的喷墨打印机上测试没问题，今天去用户那里实际测试时，为什么打印输出为pdf文件后预览正确再打印出来的结果也和预览的不一样啊？

此主题相关图片如下：qq截图20140611160553.jpg

 

打印机上自定义纸张是215X140，纵向(因为进纸是宽的那边进)，输出为pdf打开后预览是正确的，打印后方向却旋转了90度。

 

最后的代码如下：

'---设置以上部份作为页脚
doc.PageFooter = ra
'---输出为pdf
.SavePDF( "c:\print.pdf") '保存为PDF文件
Dim Proc As New Process '打开PDF文件
Proc.File = "c:\print.pdf"
Proc.Start()
'Doc.Preview() '预览报表
'Doc.Print()

这个问题真的无解了吗？