sql语句查询问题 请大侠指点

有两个表
表A
id bigtype
1    2222
2    3333
3    4444
4    5555
 
表B
id bigtype smalltype
5    2222    8888
6    2222    9999
7    2222    0000
8    4444    0123
9    4444    5252

表B中的bigtype是调用的表A中的

想输出
2222
    8888  9999  0000
4444
    0123  5252
就是产品大类小类问题

我该怎样输出  写sql语句  请各位大侠帮帮忙

我的QQ：342542470
在线等  谢谢

---

VBScript code:

<%
Set conn = CreateObject("ADODB.Connection")
conn.Provider = "MSDataShape"
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\AA.mdb;"
conn.Open
sql = "SHAPE {SELECT DISTINCT bigtype from A} " &_
"APPEND({SELECT bigtype, smalltype from B } AS DE " &_
"RELATE bigtype TO bigtype)"

Set de = Nothing
Set rs = CreateObject("ADODB.Recordset")
rs.Open sql, conn

Do While Not rs.eof
Response.Write rs(0).Value & "<br>"
Set de = rs(&