Ik heb een mailprogramma gemaakt en gekoppeld aan een listview enz.
Mijn vraag is de volgende:
1.Hoe krijg ik meerdere emailadressen dus om het bericht naar meerdere personen te zenden:
2. Hetzelfde maar dan meerdere attachments te zenden in 1 keer
Mijn code is:
Mijn vraag is de volgende:
1.Hoe krijg ik meerdere emailadressen dus om het bericht naar meerdere personen te zenden:
2. Hetzelfde maar dan meerdere attachments te zenden in 1 keer
Mijn code is:
Code:
objemail = CreateObject("CDO.Message")
objemail.From = TextBox1.Text
objemail.To = TextBox2.Text [COLOR="red"]'DEZE DUS[/COLOR]
objemail.Subject = TextBox3.Text
objemail.Textbody = TextBox4.Text
objemail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objemail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _
"mailhost.hetnet.nl"
objemail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objemail.Configuration.Fields.Update()
objemail.AddAttachment(TextBox5.Text) [COLOR="red"]'DEZE DUS[/COLOR] objemail.Send()_