jkfeagle
Codus Confusious
- Local time
- Today, 15:34
- Joined
- Aug 22, 2002
- Messages
- 166
Somebody please help!! I'm trying to set a button up on a form to send an e-mail. The code below in in the On Click property. I keep getting an error message 'Microsoft Access cannot find the field 'l' referred to in your expression'. The line of code that the debugger takes me to is the first strTextMessage line. I don't even see an 'l' in that line! frmTransaction_History and frmFinancial_Tracking are subforms on the main form. I don't have much hair left to pull out. Somebody save what little I have left!
Private Sub cmdSendEmail_Click()
Dim strTextMessage As String
strTextMessage = "Dear " & [frmTransaction_History]![Name] & "," & Chr(13)
strTextMessage = strTextMessage & Chr(13)
strTextMessage = strTextMessage & "Congratulations on winning the " & Me!Title & " Auction" & Chr(13)
strTextMessage = strTextMessage & "Your winning bid amount was $" & Me!FinalBid & " and your shipping will be $" & [frmFinancial_Tracking]![Shipping] & ". strTextMessage = strTextMessage & "Thanks so much for your business and I look forward to hearing from you!" & Chr(13)
strTextMessage = strTextMessage & Chr(13)
DoCmd.SendObject acSendNoObject, , , Me![Transaction_History]!, , , "Ebay Auction " & Me!ItemNumber, strTextMessage, True

Private Sub cmdSendEmail_Click()
Dim strTextMessage As String
strTextMessage = "Dear " & [frmTransaction_History]![Name] & "," & Chr(13)
strTextMessage = strTextMessage & Chr(13)
strTextMessage = strTextMessage & "Congratulations on winning the " & Me!Title & " Auction" & Chr(13)
strTextMessage = strTextMessage & "Your winning bid amount was $" & Me!FinalBid & " and your shipping will be $" & [frmFinancial_Tracking]![Shipping] & ". strTextMessage = strTextMessage & "Thanks so much for your business and I look forward to hearing from you!" & Chr(13)
strTextMessage = strTextMessage & Chr(13)
DoCmd.SendObject acSendNoObject, , , Me![Transaction_History]!, , , "Ebay Auction " & Me!ItemNumber, strTextMessage, True