Work with freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely, and get projects done right.
Public Sub SendEmail(RDORcvdMail As Redemption.RDOMail, MailRecipient As String) Dim lrdoNotifyMail As Redemption.RDOMail Dim lstrBody As String On Error GoTo ErrorHandler Set lrdoNotifyMail = RDORcvdMail.Forward lrdoNotifyMail.To = MailRecipient lrdoNotifyMail.Subject = RDORcvdMail.Subject lstrBody = "Testing line 1" & vbCrLf & "Testing line 2" & vbCrLf & "Testing line 3" & vbCrLf & RDORcvdMail.Body lrdoNotifyMail.RTFBody = lstrBody lrdoNotifyMail.Send If Not (lrdoNotifyMail Is Nothing) Then Set lrdoNotifyMail = Nothing End If Exit Sub . . .
Join the community of 500,000 technology professionals and ask your questions.