vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Mails mit MAPI versenden 
Autor: Seebi
Datum: 22.10.02 17:21

Hi @ all !!!
Ich habe ein Problem......
Ich möchte gerne Serienmails versenden. Und da habe in der MSDN-Library einen Code entdeckt, der wenn ich ihn in einem seperaten Projekt laufen lasse wunderbar funktioniert. nur wenn ich den Code in mein kleines Programm einbinde versteht VB plötzlich manche Methoden nicht mehr, welche zuvor anstandslos funktioniert haben.
Die Referenzen habe ich kontrolliert, die sind alle da.
Ich füge meinen Code hinten an und habe die Methoden die nicht mehr verstanden werden extra weit eingerückt und noch gekennzeichnet mit ('<<<).
(Ich möchte die Adressen,Betreffzeile,Mailtext und Attachments gerne über Variablen manipulieren.)Wie könnte ich dies evtl. noch anders lösen, oder was übersehe ich ?????
Thx für jede Mühe schon mal.... Seebi


Sub test()

Dim MAPISession1 As MAPISession
Dim MAPIMessages1 As MAPIMessages

Const SESSION_SIGNON = 1
Const MESSAGE_COMPOSE = 6
Const ATTACHTYPE_DATA = 0
Const RECIPTYPE_TO = 1
Const MESSAGE_RESOLVENAME = 13
Const MESSAGE_SEND = 3
Const SESSION_SIGNOFF = 2

With MAPISession1

.Action = SESSION_SIGNON

.SessionID = frmMail.MAPISession1.SessionID

.Action = MESSAGE_COMPOSE 'Start a new message

.MsgSubject = p_TextSub '<<<

.MsgNoteText = p_TextBody '<<<

.AttachmentPosition = 0' <<<

.AttachmentType = ATTACHTYPE_DATA '<<<

.AttachmentName = "E-Mail Anhang :"' <<<

.AttachmentPathName = p_Attachment `<<<

.RecipIndex = 0 '<<<
.RecipType = RECIPTYPE_TO '<<<
.RecipDisplayName = sEmailAdress '<<<

.Action = MESSAGE_RESOLVENAME

.Action = MESSAGE_SEND

.Action = SESSION_SIGNOFF

End With


End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Mails mit MAPI versenden822Seebi22.10.02 17:21
Re: Mails mit MAPI versenden519michi-bib23.10.02 08:57

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel