Office中国论坛/Access中国论坛

标题: 销售单窗体中想调用价格查询中的价格，结果全部都是“4.4”！！大侠们救命啊！ [打印本页]

作者: boy8848 时间: 2006-12-5 00:12
标题: 销售单窗体中想调用价格查询中的价格，结果全部都是“4.4”！！大侠们救命啊！
[attach]21912[/attach]

Me.单价 = CCur(DLookup("[吨价]", "SS-最新价格查询L", "产品编号='" & Me.产品编号 & "'") / 1000)

库中建有两个新价格查询“SS-最新价格查询L”和“SS-最新价格查询”，用上述语句中用前一个查询结果销售单子窗体中的单价全部都是“4.4”。[em06]用后一个显示数据类型不匹配。

我快死了……谁来救救我……

[此贴子已经被作者于2006-12-4 16:49:31编辑过]

作者: qlm 时间: 2006-12-5 08:06
首先，"SS-最新价格查询L”语句要改为如下：

SELECT P产品5明细表.产品ID AS 编号, Max([SS-销售价格扩展查询].实施日期) AS 实施日期, Last([SS-销售价格扩展查询].吨价) AS 吨价
FROM [SS-销售价格扩展查询] INNER JOIN P产品5明细表 ON [SS-销售价格扩展查询].产品编号 = P产品5明细表.产品ID
GROUP BY P产品5明细表.产品ID;

然后改VBA如下：

Private Sub 产品编号_AfterUpdate()
If IsNull([产品编号]) Then Exit Sub
Me.单价 = DLookup("吨价", "SS-最新价格查询L", "编号=" & Me.产品编号) / 1000
End Sub

如果我没有理解错的话。

作者: boy8848 时间: 2006-12-5 22:17
问题搞定，真是太感谢牛虫老师了！！[em07]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)