We value your feedback.
Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Private Sub txtEmail_Click() Dim strEmail As String If IsNull(Me.txtEmail) Then MsgBox ("There is no email address shown") Exit Sub ElseIf Me.txtEmail = " " Then MsgBox ("There is no email address shown") Exit Sub End If strEmail = Me.txtEmail DoCmd.SendObject , , , strEmail, , , , , True End Sub
Join the community of 500,000 technology professionals and ask your questions.