怎么判断添加到数据库的信息重复 VB

只能告诉你一个思路，首先看你的库表有没有索引或

主键

，如果有，按主键或索引select出若干字段，与你要添加的信息的对应字段进行比较，两者不同时insert，如果没有只能按一定条件取出字段比较。

取数据时用distinct子句做唯一筛选

准确来说，如果你的库表本身有

唯一索引

，是不可能重复插入数据的

针对这种情况，可以先将这份Excel数据全部导入到一张临时表中，然后表与表之间进行验证，对已经存在的记录进行标记，然后将标记数据删除，剩下的就是需要导入数据库表的数据，再导入就可以了。

这种做就不存在你所说的问题了。

我是用以下代码做的，不知道还有没有高人的更好的办法

dim sql as string

dim rs as new ADODB.Recordset

sql= "select * from m_data where m_name like '" &要填加的姓名变量 &"'"

rs.Open sql, conn, adOpenKeyset, adLockPessimistic

if rs_RecordCount >0 then

MsgBox " 已经存在！", 48, "starsystem"

else

'添加就好了

end if

---