emailen in vb

[vragenfreak92]

email

hoe verzendt ik gegevens die je invoert in een formulier naar mijn email adres ??



gropetjes !

 

[That Guy]

Daar zijn veel verschillende manieren voor, onder andere via Outlook.
Via outlook zou het ongeveer er zo moeten uitzien:

Dim oOApp As Outlook.Application
Dim oOMail As Outlook.MailItem

Set oOApp = CreateObject("Outlook.Application")
Set oOMail = oOApp.CreateItem(olMailItem)

With oOMail
.To = "name@domain.com"
.Subject = "email subject"
.Body = "email message"
.Attachments.Add "\\server\drive\folder\filename", olByValue, 1
.Send
End With

Noot: deze code werkt niet helemaal. Zoek op google naar exacte werking.

Verder kan je ook het "MAPI" gebruiken (Messaging Application Programming Interface),
Een MAPI tutorial:
http://www.devarticles.com/c/a/Visual-Basic/Sending-Email-With-MAPI-Components-in-Visual-Basic/


Succes, V :thumb:

 

[Hans van Dijck]

Mail versturen via outlook

Dim Outl As Outlook.Application
Dim MailM As Outlook.MailItem

Set Outl = CreateObject("Outlook.Application")
Set MailM = Outl.CreateItem(olMailItem)

MailM.To = "blabla@chello,nl"
MailM.CC = TxtMailCC
MailM.BCC = TxtMailBCC
MailM.Subject = TxtSubject 'plaats hier je bericht
MailM.Body = RtbBody

MailM.SendMail