A
alvin Kuiper
Hi!
I have try this
After my mail setup last line:
msg = msg & "</table>"
then i try this
Set objRecip = objMail.Recipients.Add("Mymail")
objRecip.Resolve
If objRecip.Resolved Then
objRecip.Type = olBCC ' 3
End If
addee = "Mymail"
With objMail
.To = addee
.Subject = "Booking"
.HTMLBody = msg
On Error GoTo cancelvalgt
.Send
End With
I get my mail, with addee
But not the Bcc mail
What is wrong here?
Alvin
I have try this
After my mail setup last line:
msg = msg & "</table>"
then i try this
Set objRecip = objMail.Recipients.Add("Mymail")
objRecip.Resolve
If objRecip.Resolved Then
objRecip.Type = olBCC ' 3
End If
addee = "Mymail"
With objMail
.To = addee
.Subject = "Booking"
.HTMLBody = msg
On Error GoTo cancelvalgt
.Send
End With
I get my mail, with addee
But not the Bcc mail
What is wrong here?
Alvin