G
Guest
I use the DoCmd.SendObject acSendNoObject that sends out an email. It gets
the data from the record that it is in. I would like to add some data that is
in the following table.
Table: COL_1St_PM
C1_PM_Name
C1_PM_Phone
If I could have the DoCmd.SendObject acSendNoObject put this at the end of
the E-amil the Point of Contact would be on all emails.
Thanks
Private Sub Command1364_Click()
DoCmd.SendObject acSendNoObject, , , "(e-mail address removed)", , ,
"College First Reenrollment for " & [indiv_name] & " SSN:" & [ind_ssn], "" _
& "Reenrollment for " & [indiv_name] & ", SSN:" & [ind_ssn] & vbCrLf &
vbCrLf & "DEP In Date: " & [DEPInDate] & "New Enrollment Dates: START DATE: "
& [Sem Start Date] & " End Date: " & [Sem End Date] & vbCrLf & vbCrLf &
"Enrollment History:" & vbCrLf & [REMARKS], , True
End Sub
the data from the record that it is in. I would like to add some data that is
in the following table.
Table: COL_1St_PM
C1_PM_Name
C1_PM_Phone
If I could have the DoCmd.SendObject acSendNoObject put this at the end of
the E-amil the Point of Contact would be on all emails.
Thanks
Private Sub Command1364_Click()
DoCmd.SendObject acSendNoObject, , , "(e-mail address removed)", , ,
"College First Reenrollment for " & [indiv_name] & " SSN:" & [ind_ssn], "" _
& "Reenrollment for " & [indiv_name] & ", SSN:" & [ind_ssn] & vbCrLf &
vbCrLf & "DEP In Date: " & [DEPInDate] & "New Enrollment Dates: START DATE: "
& [Sem Start Date] & " End Date: " & [Sem End Date] & vbCrLf & vbCrLf &
"Enrollment History:" & vbCrLf & [REMARKS], , True
End Sub