asp+access双重变量循环怎么写

asp+access双重变量循环如何写？
有两个表，如下：
A表
id company phone
1 AAA 111111
2 BBB 222222
3 CCC 333333

B表
id aid name
1 1 张三
2 1 李四
3 1 王五
4 2 刘七
5 2 吴八
6 3 陈九

要查询如果如下：

序号 公司名称 电话
1 AAA 111111 
  序号 姓名
  1 张三
  2 李四
  3 王五
2 BBB 222222  
  序号 姓名
  1 刘七
  2 吴八
3 CCC 333333
  序号 姓名
  1 陈九


===============================================
请问这个结果如何写出来？用asp写。谢谢。在线等！ 



[解决办法]
非常简单：

VBScript code

<% set rs=... sql="slece * from b where aid="& rs("id")rs.open sql,conn,1,1do while not rs.eof%><%=rs("company")%><% set rsd=... dsql="slece * from b where aid="& rs("id")rsd.open dsql,conn,1,1 do while not rsd.eof%><%=rs("name")%><% looploop%>