如何把数据库的数据不让它重复显示出来？
比如书
A B
计算机 软件
计算机 硬件
计算机 互联网
通讯 1111
法律 2222
计算机 3333333

我只想让它显示
a="计算机，通讯，法律"
a(1)="软件,硬件,互联网，3333333"
a(2)="1111"
a(3)="2222"
请帮帮忙怎么做？

分类
建立2个表，其中一个表存放类

但是这只在一个表中怎么办？

有点难回答了，如果你只是学习的话，以后建数据库就应该按规范化来建
如果是对现有的表进行改进，那就把一个表拆分2个咯

办法倒是有一个不知道行不行
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("数据库")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set Ars=server.createobject("adodb.recordset")
sql="select distinct A from 表名"
Ars.open sql,conn,1,1
可以达到 a="计算机，通讯，法律"
但是下一步怎么达到
a(1)="软件,硬件,互联网，3333333"
a(2)="1111"
a(3)="2222"
这样的效果，我除了想到利用 Ars数据集循环查询外没有想到别的好办法

接楼上
b=split(a,",")
Ars.close
for i=0 to ubound(b)
sql="select b from 表名 where a="&b(i)&"
Ars.open sql,conn,1,1
do until Ars.eof
'将各记录存入a(i)
loop
Ars.close
next