Hello - I have a form for sales people that contains a field where a follow-up call date is entered. When this date is entered it generates an e-mail and sends it to the sales person reminding them to call the client. I would like to create a hyperlink to place in the email that will open the Client Information form and display a specific record, based on the ProjectID. Is this possible? What I want is to include in the content of the e-mail a link specific to the ProjectID that will allow the sales person to click on it and it will open the database and take them to the specific record. Let me also include the coding that send the e-mail message to outlook - can the hyperlink and coding associated with it be put into the already existing coding? If so please be specific as to where I should put it:
Private Sub FUDateContacted_AfterUpdate()
Dim appOutLook As Object
Dim MailOutLook As Object
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
With MailOutLook
.To = Me.EmailRecipient 'get the recipient from the form
.Subject = "Project ID:" & Me.ID & ", Street Ref: " & Me.ClientStreet 'get the street and ID from the form
.body = "This is a reminder that you need to make a follow up call to the address in the Subject line today." (Can the hyperlink be put into this content to open the form?)
.DeferredDeliveryTime = Me.FUDateContacted 'get the date from the form
.Send
End With
Set appOutLook = Nothing
Set MailOutLook = Nothing
End Sub
Again - thanks tons for any help!
Laura
Private Sub FUDateContacted_AfterUpdate()
Dim appOutLook As Object
Dim MailOutLook As Object
Set appOutLook = CreateObject("Outlook.Application")
Set MailOutLook = appOutLook.CreateItem(olMailItem)
With MailOutLook
.To = Me.EmailRecipient 'get the recipient from the form
.Subject = "Project ID:" & Me.ID & ", Street Ref: " & Me.ClientStreet 'get the street and ID from the form
.body = "This is a reminder that you need to make a follow up call to the address in the Subject line today." (Can the hyperlink be put into this content to open the form?)
.DeferredDeliveryTime = Me.FUDateContacted 'get the date from the form
.Send
End With
Set appOutLook = Nothing
Set MailOutLook = Nothing
End Sub
Again - thanks tons for any help!
Laura