View Single Post
  #8 (permalink)  
Old January 18th, 2007, 01:59 PM
dartcoach dartcoach is offline
Friend of Wrox
 
Join Date: Jan 2005
Location: Kansas City, Missouri, USA.
Posts: 471
Thanks: 0
Thanked 1 Time in 1 Post
Default

OK.

In the after update event of the forms email, try this:

   Set rs = New Recordset
   mySQL = "Select * From People Where email = " & "'" & Me.email & "';"
   rs.Open mySQL, con, adOpenDynamic, adLockOptimistic
   With rs
      If .BOF = False Or .EOF = False Then
         msgbox "You Have Entered a Duplicate Email."
         me.email.setfocus
      End If
   End With
   rs.close
   set rs = nothing

Kevin

dartcoach