请大神帮忙看看，这个SQL查询语句怎么写。

createpc

有3个表，如下

A                       B                    c

id  name   lb           id    suliang        code    name  
1    a     101          1      4               101     a-1类
2    b     101          2      5               102     a-2类
3    c     102          3      6
4    d     102          4      2



想实现，根据关键字（a-1类）或（a-2类）查询name,以及数量


D 关键字为“a-1类”

A.NAME  B.SULIANG
a            4
b            5

E 关键字为“a-2类”
A.NAME  B.SULIANG
c            6
d            2

也就是说，按条件从AB表取数据。
谢谢大神。

jsxjd

文档直观些，查询的结果用颜色标出

zhaogang1960

请参考：

1. select A.name,B.suliang from (C left join A A on C.code=A.lb) left join B on A.id=B.id where C.name='a-1类' order by A.name

复制代码

zhaogang1960

如果三个表是工作表，VBA代码如下：

1. Sub Macro1()
   
2.     Dim cnn As Object, SQL$
   
3.     Set cnn = CreateObject("ADODB.Connection")
   
4.     cnn.Open "Provider = Microsoft.Jet.Oledb.4.0;Extended Properties =Excel 8.0;Data Source =" & ThisWorkbook.FullName
   
5.     SQL = "select A.name,B.suliang from ([C$] C left join [A$] A on C.code=A.lb) left join [B$] B on A.id=B.id where C.name='a-1类' order by A.name"
   
6.     [k2].CopyFromRecordset cnn.Execute(SQL)
   
7.     SQL = "select A.name,B.suliang from ([C$] C left join [A$] A on C.code=A.lb) left join [B$] B on A.id=B.id where C.name='a-2类' order by A.name"
   
8.     [o2].CopyFromRecordset cnn.Execute(SQL)
   
9.     cnn.Close
   
10.     Set cnn = Nothing
    
11. End Sub

复制代码

createpc

谢谢大神，马上试试

createpc

牛，完全OK。还有，大神，我如果想把两次查询得到的结果，合在一起，也就是说，EXCEL中，一直把查询结果追加到表格尾部，怎么写？

createpc

zhaogang1960 发表于 2013-10-20 15:25
如果三个表是工作表，VBA代码如下：

牛，完全OK。还有，大神，我如果想把两次查询得到的结果，合在一起，也就是说，EXCEL中，一直把查询结果追加到表格尾部，怎么写？

zhaogang1960

createpc 发表于 2013-10-20 17:30
牛，完全OK。还有，大神，我如果想把两次查询得到的结果，合在一起，也就是说，EXCEL中，一直把查询结果追 ...

通常使用union all 连接两个SQL语句即可
本题目可以修改条件语句：
    SQL = "select A.name,B.suliang from ([C$] C left join [A$] A on C.code=A.lb) left join [B$] B on A.id=B.id where C.name='a-1类' or  C.name='a-2类' order by A.name"

mm050610

学习中谢谢

amazeyeli

select name,suliang
from
(
[a$] as a
inner join [b$] as b
on a.id=b.id
) as d
inner join [c$] as c
on d.lb=c.code