G
Guest
So, I've realized that coding command buttons in VB gives you more control.
To that end, I'm trying to set up a VB command button that will populate the
Subject line with data from an autonumber field value that is displayed on
the form where the new button will be. I can get everything to work with
this except that the dynamic sujbect line doesn't work out. Any suggestions
would be appreciated (code is below sig line).
--
- Mkauley
Private Sub Command24_Click()
On Error Resume Next
Dim strMsgBody As String
Dim intSeeOutlook As Integer
Dim intSubjectNumber As String
intSubjectNumber = "Order No " = [Forms]![frmOrderDetals]![OrderNo]
' Send query in RTF format.
' Open Outlook window if intSeeOutlook is True.
' Provide Subject title bar and message text.
DoCmd.SendObject acSendReport, "rptCustomers", acFormatRTF, _
"(e-mail address removed)", , , intSubjectRAD, _
"If you have any problems with this report please contact
me.", intSeeOutlook
End Sub
To that end, I'm trying to set up a VB command button that will populate the
Subject line with data from an autonumber field value that is displayed on
the form where the new button will be. I can get everything to work with
this except that the dynamic sujbect line doesn't work out. Any suggestions
would be appreciated (code is below sig line).
--
- Mkauley
Private Sub Command24_Click()
On Error Resume Next
Dim strMsgBody As String
Dim intSeeOutlook As Integer
Dim intSubjectNumber As String
intSubjectNumber = "Order No " = [Forms]![frmOrderDetals]![OrderNo]
' Send query in RTF format.
' Open Outlook window if intSeeOutlook is True.
' Provide Subject title bar and message text.
DoCmd.SendObject acSendReport, "rptCustomers", acFormatRTF, _
"(e-mail address removed)", , , intSubjectRAD, _
"If you have any problems with this report please contact
me.", intSeeOutlook
End Sub