VB中的两表复制问题

Question

SQL server中有两个表 表一包括“用户”“访问内容”  表二是空表  包括“用户”  “访问内容”  和“访问次数”三个字段  
求一SQL语句 把表一中的记录复制到表二中？   如果有出现两条雷同记录  则只记录一条  访问次数既为2  三条则为3  没雷同的为1
谢谢  在线等

Answer 1

insert into 表二 
select 用户,访问内容, count(*) as 访问次数
from 表一
group by 用户,访问内容

Answer 2

insert into 表二 (用户,访问内容,访问次数)
select 用户,访问内容, count(1) as 访问次数 from 表一 group by 用户,访问内容

Answer 3

VB里面不能直接执行SQL语句？应该加个什么呢？  我用的是ADO访问方式
Dim adoPrimaryRS As adodb.Recordset