email address field on a form

[Guest]

Okay, I was trying to do this same thing and stumbled across the event
command to use and it worked great, so thanks to the person that posted that.
Now, my new question is that I want to be able to choose which type of letter
to ship to the individuals email address. This is going to be used in an HR
Departments Interview process. Basically if someone doesn't make the cut, I
want to be able to go to that person’s record and double click on the email
address and have it populate the subject and body with a pre-determined
template. When I double click on the persons email address, I want it to
prompt me for either the Accepted or Rejected email template. I've been
reading through all of these postings and I know someone out there has my
answer. I appreciate everyone’s help in advance. I hope that I’ve given
enough information.

Thanks,
Brian

 

[Guest]

Hi here is a little sample, you need to referece the outlook collection,
under tools referenses

brgds
Olav

Private Sub Tekst0_DblClick(Cancel As Integer)

Dim Mail As Outlook.MailItem
Dim StrMailadress As String
Dim StrSubject As String
Dim StrBody As String


StrMailadress = Tekst0


Select Case MsgBox("Choose Yes for accepted or no for rejected",
vbYesNoCancel)


Case 6
Set Mail = CreateItem(olMailItem)

StrSubject = "You are Accepted"
StrBody = "Any describing text..."
With Mail

.Recipients.Add (StrMailadress)
.Subject = StrSubject
.Body = StrBody
.Send

End With


Case 7
Set Mail = CreateItem(olMailItem)

StrSubject = "You are rejected"
StrBody = "Any describing text..."

StrSubject = "You are Accepted"
StrBody = "Any describing text..."
With Mail

.Recipients.Add (StrMailadress)
.Subject = StrSubject
.Body = StrBody
.Send

End With




Case 2
Exit Sub


End Select





End Sub


"Brian" skrev: