Hello everyone I am trying to put some code in a command button to email whoever I choose in snapshot view. Keep getting this error message I'm still new to vb so please bare with me..Thanks
Private Sub Command165_Click()
On Error GoTo Err_Command165_Click
Dim appOutlook As New Outlook.Application
Dim omItem As MailItem
Dim ReqId As String
ReqId = Me.txt1.Value
Set omItem = appOutlook.CreateItem(olMailItem)
omItem.To = "email_address"
omItem.DeleteAfterSubmit = True
omItem.Subject = "Your subject"
omItem.Body = "Your email body"