帮忙看一下代码，为什么查询出错？

lanseqingren · 发表于 2008-12-31 12:00

各位高手帮忙看一下代码那里出的错误：
combo box 的名字是 ComPartNumber List box 的名字是 List货架号
代码：
Private Sub ComPartNumber_Change()
Dim 货架号 As String
Dim sSQL As String

货架号 = Me.ComPartNumber
sSQL = "SELECT [数据Data].[零件号PartNumber], [数据Data].[货架号ShelfNumber]+'-'+[数据Data].[货位号CargoSpace]+'-'+[数据Data].[箱号BoxNumber] AS 货位状态, Count(*) AS 数量 FROM [数据Data] where [数据Data].[零件号PartNumber] = '" + 货架号 + "' GROUP BY [数据Data].[零件号PartNumber], [数据Data].[货架号ShelfNumber], [数据Data].[货位号CargoSpace], [数据Data].[箱号BoxNumber] ;"

Me.List货架号.RowSource = sSQL
End Sub
查询中“货位状态”字段显示 #Error

[ 本帖最后由 lanseqingren 于 2009-1-4 14:23 编辑 ]

lanseqingren · 发表于 2009-1-4 11:30

本人刚学ACCESS，各位高手帮帮忙吧，不要让我失去信心。

Renco · 发表于 2009-1-4 12:54

最后一字段 [C数据Data].[箱号BoxNumber]
是不是多了一个C??

lanseqingren · 发表于 2009-1-4 14:22

谢谢Renco是多了一个C，但是我把它去掉查询的HWZT字段仍然出错，不知道为什么？再帮我看看好吗？先谢谢了。

Renco · 发表于 2009-1-4 15:04

把其中的加号"+" 换成" & " 符号
在ACCESS用&做为字符连接符比较稳妥,你可以改改试试

lanseqingren · 发表于 2009-1-4 15:58

谢谢Renco把加号"+" 换成" & " 符号查询没有问题了。但是，出现了一个报错，再帮我看看好吗？？谢谢

[ 本帖最后由 lanseqingren 于 2009-1-4 16:06 编辑 ]

Renco · 发表于 2009-1-13 21:57

从公司回家了..无法帮你解决了,网吧里没装ACCESS
不过我在原电脑中测试是成功的,你试着用查询做成后COPY它的SQL语句

lanseqingren · 发表于 2009-1-14 15:10

谢谢Renco我试一下，有问题再和你联系。谢谢

		自动登录	找回密码
密码			免费注册

[求助] 帮忙看一下代码，为什么查询出错？