如何检查数据库中已有相同记录

Question

dim a as string
如何检查数据库中已有相同记录
if ????????
    For kahao = kahao1 To kahao2 + 1
      rs.AddNew
      rs!qq = Trim(Combo1.Text)
      rs!ww = Trim(Combo2.Text)
    Next
end if

Answer 1

不知道你的具体的情况一般都是
If Exists(Select * From TableName WHere 字段='条件')
如果为真就是存在
或者是
If （Select Count(*) From TableName Where 字段=‘条件’）〉0

Answer 2

rs.open  "select * From TableName WHere name ='admin' and pass ='admin'" ,cn,2,3
 如果rs为空,表示存在此条数据

Answer 3

ADO 还是 DAO？ 假定是 ADO：    For kahao = kahao1 To kahao2 + 1
     rs.MoveFirst
     rs.Find "qq =" & Trim(Combo1.Text)
     If rs.EOF Then
      rs.AddNew
      rs!qq = Trim(Combo1.Text)
      rs!ww = Trim(Combo2.Text)
      rs.Update
     Else
      If rs!ww <> Trim(Combo2.Text) Then
        rs.AddNew
        rs!qq = Trim(Combo1.Text)
        rs!ww = Trim(Combo2.Text)
        rs.Update
      End If
     End If
    Next

Answer 4

dim a as string
If Exists(Select * From TableName WHere 字段='条件')  
    For kahao = kahao1 To kahao2 + 1
      rs.AddNew
      rs!qq = Trim(Combo1.Text)
      rs!ww = Trim(Combo2.Text)
    Next
end if
会不会太慢？如果rs为空,如何检测？