Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口piao据连续打印的问题请教


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

主题:[求助]窗口piao据连续打印的问题请教

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


加好友 发短信
等级:幼狐 帖子:196 积分:2156 威望:0 精华:0 注册:2013/5/10 15:59:00
[求助]窗口piao据连续打印的问题请教  发帖心情 Post By:2019/7/22 11:36:00 [只看该作者]

各位老师,我想用窗口功能,实现piao据连续打印出来,这个应该怎么设置,请指导一下,谢谢

图片点击可在新窗口打开查看此主题相关图片如下:截屏图片.jpg
图片点击可在新窗口打开查看
(说明一下:这份表格是一个文员的前任前任、再前任,她自己用excel宏套打格式设计出来,前几天换了一台喷墨机后,版面格式就跟着变动了一下,我无论怎么设置更改表格,都会被默认之前打印机的版面(之前打印机的型号已停产,市面找不同款的),所以我只有foxtablepiao据界面重新设计一下,但不想用导出excel表格进行版面套打,只想在窗口里打印出来)

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目3.table



我引用代码后,它只是一张张地显示空白的
For i As Integer = 0 to  Tables("质检出机").Rows.Count
    Tables("质检出机").Position = i
    Dim doc As PrintDoc = Forms("出机").GernatePrintDoc()
    doc.Preview()
Next

请各位老师帮忙指导一下,谢谢

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107863 积分:548678 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/7/22 13:47:00 [只看该作者]

测试没有问题。把打印机改为默认打印机,或者使用代码设置一下:http://www.foxtable.com/webhelp/topics/1603.htm

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


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2019/7/22 13:52:00 [只看该作者]

1、打开窗口再测试
2、将doc.Preview()改为doc.Print()

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


加好友 发短信
等级:幼狐 帖子:196 积分:2156 威望:0 精华:0 注册:2013/5/10 15:59:00
  发帖心情 Post By:2019/7/22 14:21:00 [只看该作者]

改为doc.Print(),就是不会弹出预览窗口,连续地打印出来了,而且会默认把最后一条(EG315)连续打两次出来的
[此贴子已经被作者于2019/7/22 14:22:48编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107863 积分:548678 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/7/22 14:43:00 [只看该作者]

For i As Integer = 0 to  Tables("质检出机").Rows.Count - 1

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


加好友 发短信
等级:幼狐 帖子:196 积分:2156 威望:0 精华:0 注册:2013/5/10 15:59:00
  发帖心情 Post By:2019/7/22 15:02:00 [只看该作者]

打了四张空白纸出来~

 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107863 积分:548678 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/7/22 15:29:00 [只看该作者]

打印驱动,或者打印机本身的原因吧。另外有没有设置好纸张大小:
图片点击可在新窗口打开查看


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


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2019/7/22 16:01:00 [只看该作者]

如果是空白,一定是窗口没有打开。
你可以将代码设置在窗口的打印按钮中,不要在命令窗口测试,避免老是犯这种低级错误。

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


加好友 发短信
等级:幼狐 帖子:196 积分:2156 威望:0 精华:0 注册:2013/5/10 15:59:00
  发帖心情 Post By:2019/7/22 16:06:00 [只看该作者]

以下是引用有点蓝在2019/7/22 15:29:00的发言:
打印驱动,或者打印机本身的原因吧。另外有没有设置好纸张大小:
图片点击可在新窗口打开查看

蓝老师,我找到原因了,但是在页面设置,我只要把它调成A4格式的话,哪么能正常打印,但把它设置成自定义纸张后,如下图

图片点击可在新窗口打开查看此主题相关图片如下:aaafd.jpg
图片点击可在新窗口打开查看
就是打印空白了,请指导一下,
另外这是窗口事件我找不到呀...

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





 回到顶部
帅哥,在线噢!
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107863 积分:548678 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/7/22 16:08:00 [只看该作者]

到打印机服务属性里添加同样规格的纸张,然后设置为默认纸张。

需要什么代码直接从帮助里复制即可

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