想实现个添加数据的的功能：
　　数据库中已经有这个数据了，假如我再输入同样的数据，想出现msgbox提示＂该数据已存在，请重新输入＂
而且要使用ＡＤＯ控件，我不知道该用那个，请高手帮忙写下！谢谢了！

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\数据库名称;Persist Security Info=False"
Adodc1.RecordSource = "select * from 表名 where 字段名 = '" & 输入的数据& "'"
Adodc1.refresh
if adodc1.recordset.eof and adodc1.recordset.bof then
adodc1.recordset.addnew
.............
else
msgbox("该数据已存在,...")
end if