Mailen vanuit Visual Basic

[Xen]

hey mensen,

Ik heb een probleem, ik zou een programmaatje willen schrijven in Visual Basic waaruit ik kan e-mail. Ik heb al een tekstvak voor de ontvanger, een tekstvak voor het onderwerp en een tekstvak voor het eigenlijke bericht.

Nu is mijn vraag welke code steek je achter de knop verzenden?

Dank bij voorbaat,

Sjouke

[Waterboy]

daar moet je een mapi voor gebruiken, als k morgen eens tijd heb (savonds dus) zal k eens zien waar k de mijne heb staan, moet zodadelijk op misterieuze interventie

[guido1]

Hoi ,

Je kan ook OutLookExpress oproepen via VB, Volgende code heb ik juist gevonden in een module. Je kan kiezen, IE of OE


Option Explicit
' VB-World.net global support library for demo projects
' John Percival, Feb '99

Public Const URL = "http://www.vb-world.net"
Public Const email = "john@vb-world.net"

Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Public Const SW_SHOWNORMAL = 1

Public Sub gotoweb()
Dim Success As Long
Success = ShellExecute(0&, vbNullString, URL, vbNullString, "C:\", SW_SHOWNORMAL)
End Sub

Public Sub sendemail()
Dim Success As Long
Success = ShellExecute(0&, vbNullString, "mailto:" & email, vbNullString, "C:\", SW_SHOWNORMAL)
End Sub

Succes,
Guido

[Wouterke]

Je kan ook via Winsock een verbinding leggen met een smtp-server maar dan moet je wel de commando's kennen.

[Codeman5]

Hou het simpel. Ga gewoon in het menu project naar components en zoek de mapi component eruit.

What's the problem