M
Masoud
I have the code like below for sending email with attachments, but I found
error 2455 “you entered an expression that has an invalid reference to the
property filesearch.
' Add attachments to the message.
With Application.FileSearch
.LookIn = Forms!frmMail!Att
.FileName = "*.*"
.Execute
For i = 1 To .FoundFiles.Count
objOutlookMsg.Attachments.Add .FoundFiles(i)
Next i
End With
please help.
error 2455 “you entered an expression that has an invalid reference to the
property filesearch.
' Add attachments to the message.
With Application.FileSearch
.LookIn = Forms!frmMail!Att
.FileName = "*.*"
.Execute
For i = 1 To .FoundFiles.Count
objOutlookMsg.Attachments.Add .FoundFiles(i)
Next i
End With
please help.