奇怪的"参数不足,期待是1"问题

siaele

遇到了一个奇怪的"参数不足,期待是1"问题,查了一些资料,这问题一般是SQL语句出错,或者对象不存在时出现的,但是我的SQL是正确的,对象也存在呀.
例子在附件里,这里说一下.
表:Delivery_Note
查询: EQ_DN_Report   (就是这个查询的问题,如果不指定字段DNNO的条件,刚不会出现这个"期待是1 "的问题,弄不懂.你单独运行这个查询是正常的)
窗体:选单号
报表:DN_PR

我的目的是 在窗体上指定DNNO,然后查询以窗体的DNNO为条件进行查询,然后报表读取 查询里的内容
代码在报表DN_PR里,不过就算是放到窗体上运行一样出现这个错误
代码如下:

Private Sub Report_Activate()

Dim db  As DAO.Database
Dim rs  As DAO.Recordset
Dim fd  As DAO.Field
Dim bh As String
Set db = CurrentDb()
Set rs = db.OpenRecordset("EQ_DN_Report") ' 此步出错,如果查询时不指条件的话,就不会出错
If rs.EOF = True Then
MsgBox " 记录为空,请填写送货单内容!"
   DoCmd.Close
Else
Me.DNNO = rs.Fields("dnno").Value
Me.CusName = rs.Fields("CusName").Value
End If
End Sub

提问期待是1问题.rar (53.11 KB, 下载次数: 58)

2016-4-14 20:45 上传

点击文件名下载附件

roych

给出2种建议：
1、在打开报表之前先判断到底有没有记录，没有记录则不打开报表。
2、在使用报表NoData事件，不过这个对预览是无效的，只能在打印时取消。
提问期待是1问题.rar (23.62 KB, 下载次数: 40)

2016-4-15 11:00 上传

点击文件名下载附件

比较推荐使用第一种方法。

siaele

roych 发表于 2016-4-15 11:01
给出2种建议：
1、在打开报表之前先判断到底有没有记录，没有记录则不打开报表。
2、在使用报表NoData事 ...

查询里是有数据的呀

roych

siaele 发表于 2016-4-15 11:13
查询里是有数据的呀

没有选择条件的时候是没有数据的。
此外，报表里的数据源往往是在load事件加载的，而不是active再加载。
最后，同时打开一个同一个数据源的记录集可能会出错的。如果非要这样写，建议关闭了前面的记录集再说