我现在在做一个发票的套打软件。
Printer.ScaleMode = 6 '设置打印的单位
'Printer.Orientation = vbPRORPortrait '纵向打印
'Printer.Orientation = vbPRORLandscape '横向打印
Printer.PaperSize = vbPRPSA4 '定义纸张大小为A4
'Printer.Width = fVouchWidth * PrnUnit '初始化打印纸的宽度
'Printer.Height = fVouchHight * PrnUnit '初始化打印纸的高度
'Printer.ScaleWidth = 210
'Printer.ScaleHeight = 297
Printer.FontSize = 11这些是我打印的设置。我在能支持A3的打印机上打印一切正常,
如果我设置为A4来打的话,纵打也正确,
但是客户他想横打,我在A3的打印机上横打正常
但是客户的打印机只支持A4,如果我采用A3的设置打印的话,没反应
如果采用A4设置横打的话,宽度不够,打少了最右边的东西我现在的要求是,能在客户的打印机上设置足够长的宽度 刚才上面的代码只支持98,,在2000不支持。还有的就是,上面的那个横打设置好象没有效果。我用了别人的一个横打的函数来设置的。
其次,有没有一种方法临时改变打印设置的呀!我非常急,已经好几天没睡好觉了,希望大家能帮帮忙,,要分的话,我可以帮你们加到满意为止
Printer.ScaleMode = 6 '设置打印的单位
'Printer.Orientation = vbPRORPortrait '纵向打印
'Printer.Orientation = vbPRORLandscape '横向打印
Printer.PaperSize = vbPRPSA4 '定义纸张大小为A4
'Printer.Width = fVouchWidth * PrnUnit '初始化打印纸的宽度
'Printer.Height = fVouchHight * PrnUnit '初始化打印纸的高度
'Printer.ScaleWidth = 210
'Printer.ScaleHeight = 297
Printer.FontSize = 11这些是我打印的设置。我在能支持A3的打印机上打印一切正常,
如果我设置为A4来打的话,纵打也正确,
但是客户他想横打,我在A3的打印机上横打正常
但是客户的打印机只支持A4,如果我采用A3的设置打印的话,没反应
如果采用A4设置横打的话,宽度不够,打少了最右边的东西我现在的要求是,能在客户的打印机上设置足够长的宽度 刚才上面的代码只支持98,,在2000不支持。还有的就是,上面的那个横打设置好象没有效果。我用了别人的一个横打的函数来设置的。
其次,有没有一种方法临时改变打印设置的呀!我非常急,已经好几天没睡好觉了,希望大家能帮帮忙,,要分的话,我可以帮你们加到满意为止
解决方案 »
- access 2000 VBA 运行错误“13”,类型不匹配??
- 帮我解释一下这个c语言题
- 用Excel.Application怎么补全没满页的行数?
- "发电厂通用设备管理系统"(实用软件),欢迎下载!
- 求助:怎样向一个图片框中载入任意幅图片,并可以利用滚动条翻看
- 如何动态创建数组控件,高手请进
- 大家救命阿,一个基础问题!
- 求教用什么函数对"%C9%BD%B5%D8%D7%D4%D0%D0%B3%B5"与"山地自行车"相互转换
- 请教高手:Excel ActiveX 组合框控件,其属性选项卡中的名称,如何通过代码修改?
- 现场调查,来者有分。前100名
- VB用ADO刷新recordset的一个头痛问题, 每个人应该都遇到过, 请教大家
- VB中使用MSCOMM控件如何读取返回的16进制字节?
你让客户换个打印机驱动,比如我原来的松下1121只支持窄幅面的,缺字,换了LQ1600K就好了。
很多打印机驱动都是兼容的。
24mm * 14 mm 这个格式是刚好能打印一个完整的发票,我用debug.print printer.width这个格式都与我设置的一致,保证没问题,因为我设置 14mm * 14mm 他只打印出一半,那么说明我的发票设置是采用了我 24mm * 14mm 的纸张大小。这些都是我在富士通的针式打印机上测试的结果,打印正常,后来我发给客户打印试下,同样的程序他们只能打印到A4纸的宽度,我晕倒。这些到底是什么问题? 知道的能略加指点下吗?设置打印机属性的代码比较长,这里就不贴出来了。。
1、ESPON LQ 635K的走纸在一定宽度后会变得不准,特别是使用原装的驱动,请使用LQ-1600K的驱动试试,很多情况能解决你的问题
2、走纸不准一般与高度关系最大,而宽度你可以设置大一点,比如29cm,这与你打印发票没有关系的,而高度有时就要在他的打印机上调试了,当宽度较大,比如你的14cmm打印不准,你可以微调,比如14.1-14.5之间调一下3、如果是连续打印,可能设置成两张发票为一个走纸,即发票的高度为14*2,放两个发票页面,根据程序判断每页打印两张发票。
我新建了一个 "mycustomform"的纸张类型 规格是250mm * 240mm 但是在他的打印机上使用不了,其他打印机都没问题,烦死了,,客户说给我一个月的时间搞定,我计划用C#来写一个,不知道会不会简单一点。
还有在此说一句话,最近也发现这里有很多人问怎么设置打印默认、自定义纸张类型、或者打印的其他东西,我这里有具体的代码,需要的人可以MAIL给我,我就发给他 [email protected]很感谢在这里的各位热情的帮助,,谢谢
http://myrandy.cnblogs.com/articles/209781.html嘻嘻,,我的问题还没搞定