Hi,
Is it correct code for sending email from a form of current record data via outlook.
Code:
Private Sub cmdemail_Click()On Error GoTo Err_cmdemail_Click
Dim stDocName As String
Dim strDocName As String
Dim stWhere As String
Dim stEmail As String
Dim stSubject As String
If Me.Dirty Then Me.Dirty = False
stDocName = "Quality Inspection Report"
strWhere = "[InspectionID]=" & Me!InspectionID
stEmail = "zahid@cpc.com.sa"
stSubject = "VCP Finish Goods Quality Inspection Report"
DoCmd.SendObject acSendForm, stDocName, acFormatPDF, stEmail, , , stSubject, , , False
Exit_cmdemail_Click:
Exit Sub
Err_cmdemail_Click:
MsgBox Err.Description
Resume Exit_cmdemail_Click
End Sub
but it shows error on click "The database cant find the object 'l1'
Kindly help