设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 833|回复: 14
打印 上一主题 下一主题

请问如何在打印时只打印当前的单子,而不是所有的单子

[复制链接]
跳转到指定楼层
1#
发表于 2003-2-17 21:35:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
举个例子:
比例说我当前输入一个申请单,然后按打印,这时只打印我当前输入的单子,而不要打印其它的单子
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2003-2-17 21:52:00 | 只看该作者
将报表的筛选设成“字段=输入的单号”即可。
3#
 楼主| 发表于 2003-2-17 23:32:00 | 只看该作者
请问能不能举个例子
4#
 楼主| 发表于 2003-2-18 16:49:00 | 只看该作者
有没有哪位大虾能帮我解决,我不甚感激
5#
发表于 2003-2-18 16:59:00 | 只看该作者
docmd.openreport "报表名称",,,"单号='"+指定的单号+"'"
6#
 楼主| 发表于 2003-2-18 20:36:00 | 只看该作者
有没有一个具体的例子让我来参考一下
7#
发表于 2003-2-18 21:43:00 | 只看该作者
我的打印按钮 click 事件过程.
Private Sub cmdPrint_Click()
On Error GoTo Doerr
   
    If Not (GetPur(Bill, Gsys_Print) And GetPur(SUBBILL, Gsys_Print)) Then
        Gerr = 18 '没有打印权限
        GoTo Errexit
    End If
   
    If listSn = "" Or IsNull(listSn) Then
        Gerr = 42 '未指定待打印的单据单号
        GoTo Errexit
    End If
   
    '预览
    DoCmd.OpenReport "打印BOM", acPreview, , "bom明细.关联='" + listSn + "'"

Complete:
    Gerr = 0
    Exit Sub
   
Doerr:
    Gerr = -1
Errexit:
    ShowErr
End Sub
8#
 楼主| 发表于 2003-2-19 00:08:00 | 只看该作者
我照你的方法在按打印按钮的时候,总是提示输入参数值,不知道怎样不需提示直接打印报表
9#
 楼主| 发表于 2003-2-19 00:19:00 | 只看该作者

图片如下

[upload=gif]http://www.office-cn.net/vvb/uploadimages/200321816183842392.gif[/img]
10#
发表于 2003-2-19 00:25:00 | 只看该作者
那是你的参数引用出错,并不是方法的问题.
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2025-5-16 06:54 , Processed in 0.095749 second(s), 33 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表