Mail i VB6

You must have a reference to MS Outlook object libraray found in menu project/references.
This includes those necessary files.

Dim OutL As Outlook.Application
Dim Item As MailItem
Dim Receiver As Recipient

    Set OutL = New Outlook.Application
    Set Item = OutL.CreateItem(olMailItem)
   
    With Item
        .Subject = \"mail test\"
        .Body = \"mail body\"
        .FlagStatus = olFlagMarked
        Set Receiver = .Recipients.Add(\"some mail address\")
       
        If Not Receiver.Resolve Then
            .Display
        Else
            .Send
        End If
    End With
   
    Set Item = Nothing

Er det til vis man ønsker at modtage mail eller sende mail?

send mail via Outlook.
Du skla ændre .Subjust + .Body + .Recipient.Add til noget andet.

.Recipient.Add er den/de Email adresse du sende til, f.eks. \"a1@.tele.dk;a2@tele.dk\"