E-Mails mit Visual Basic?
- Themenstarter Kosh
- Beginndatum
Dario Linsky
Erfahrenes Mitglied
die einfachste methode mit der man sowas machen kann, ist dass man auf die mapi-schnittstelle zurückgreift. wenn auf dem computer schon outlook oder der internet explorer installiert ist, sollte die schnittstelle vorhanden sein und kann zum verschicken von emails genutzt werden.
dafür gibt's natürlich auch komponenten, die in einem formular genutzt werden können. im menü unter projekt\komponenten sind in der liste der verfügbaren steuerelemente auch die microsoft mapi controls 6.0 aufgeführt. die wählst du einfach aus, nimmst beide neuen steuerelemente auf das formular und schreibst beispielsweise folgenden code:
der einzige nachteil ist ein kleiner schönheitsfehler - beim verschicken wird nämlich kurz der eingestellte standard-client zum verwalten von emails angezeigt.
dafür gibt's natürlich auch komponenten, die in einem formular genutzt werden können. im menü unter projekt\komponenten sind in der liste der verfügbaren steuerelemente auch die microsoft mapi controls 6.0 aufgeführt. die wählst du einfach aus, nimmst beide neuen steuerelemente auf das formular und schreibst beispielsweise folgenden code:
Code:
Private Sub Command1_Click()
On Error Resume Next
Dim strSubject As String
Dim strMessage As String
'Inhalt erstellen
strSubject = "test mail"
strMessage = "blablub"
MAPISession1.SignOn
MAPIMessages1.SessionID = Me.MAPISession1.SessionID
With MAPIMessages1
.Compose
.MsgSubject = strSubject
.MsgNoteText = strMessage
.RecipAddress = "name@provider.de"
.Send False
End With
MAPISession1.SignOff
End Subder einzige nachteil ist ein kleiner schönheitsfehler - beim verschicken wird nämlich kurz der eingestellte standard-client zum verwalten von emails angezeigt.
Dario Linsky
Erfahrenes Mitglied
für dateianhänge musst du einfach nur eine kurze beschreibung der datei und den dateinamen angeben. füg einfach noch folgenden code mit ein, bevor du die email mit der send-methode abschickst:
Code:
.AttachmentName = "blablub"
.AttachmentPathName = "c:\test.txt"Dario Linsky
Erfahrenes Mitglied
die komponenten heissen schon so. normalerweise wird mit dem internet explorer bzw. outlook express eine schnittstelle installiert, mit der man emails schicken kann.
mapi ist da zwar nicht das absolute nonplusultra, aber sollte normalerweise erstmal ausreichen.
die datei heisst msmapi32.ocx und liegt unter c:\windows\system32 bzw. c:\winnt\system32. wenn die nicht vorhanden ist, dann ist mapi nicht installiert.
mapi ist da zwar nicht das absolute nonplusultra, aber sollte normalerweise erstmal ausreichen.
die datei heisst msmapi32.ocx und liegt unter c:\windows\system32 bzw. c:\winnt\system32. wenn die nicht vorhanden ist, dann ist mapi nicht installiert.
