Ready to improve network connectivity? Watch this webinar to learn how SD-WANs and a one-click instant connect tool can boost provisions, deployment, and management of your cloud connection.
Private Sub project_Write(Cancel As Boolean) Dim projectNotes As String projectNotes = project.Body If originalprojectNotes <> projectNotes Then originalprojectNotes = projectNotes Set mail = Application.CreateItem(olMailItem) mail.Subject = "" & project.Subject & " notes have been updated" mail.HTMLBody = "<font face='arial' colour='#000080' size='2'><p>" & project.Subject & " has been updated. The current notes are:</p><p> " & projectNotes & "</p>><p><font size = '1'>V. 1 - /4501/</p>" mail.To = "email@example.com" mail.Send End If
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.