E-Mail nicht sofort senden, Vorschau anzeigen

  • Hallo!

    Ich nutze die DvApi32 um per VB.NET E-Mails zu versenden. Mit der Funktion 'oMailItem.Send' wird die E-Mail allerdings immer sofort versendet. Gibt es eine Möglichkeit, die E-Mail nur vorzuschlagen und dann anzuzeigen, so dass der Benutzer die E-Mail noch weiterbearbeiten kann und dann selbst auf "Senden" klicken muss?

    Beim Versand mit MAPI kann ich z.B. angeben .Send(True), so dass die E-Mail nicht direkt versendet werden kann. Ich möchte aber nicht mit MAPI sondern lieber mit der David-API arbeiten.

    Vielen Dank im Voraus!
    Daniel

  • Könnte man bestimmt so lösen, dass man die Nachricht im Wartezustand verschickt, dadurch im Versand auf Warten steht und dann diesen Eintrag wieder öffnet, versehen mit einem Button

    Bin gerne an Entwicklung zwecks Austausch bei Interesse interessiert.

    Beste Grüße

    Claudio Carrano (TSCP)
    CARRANO IT-Consulting

    * Ihr Systemhaus für elektronische Kommunikation * Über 25 Jahre Erfahrung *
    ***** Tobit 5-Sterne Partner


    Tobit-Programmierung: Portal, Workflow, DVCC & Add-Ons/Tools und chayns
    Keine Haftung für hier gegebene Antworten!

    Unsere Produkte finden Sie im Tobit Tuning Center
    oder auf unserer Homepage

    info@carrano-it.de
    Tel: +49-6021-451099-0

  • Hallo!

    Ich nutze die DvApi32 um per VB.NET E-Mails zu versenden. Mit der Funktion 'oMailItem.Send' wird die E-Mail allerdings immer sofort versendet. Gibt es eine Möglichkeit, die E-Mail nur vorzuschlagen und dann anzuzeigen, so dass der Benutzer die E-Mail noch weiterbearbeiten kann und dann selbst auf "Senden" klicken muss?

    Beim Versand mit MAPI kann ich z.B. angeben .Send(True), so dass die E-Mail nicht direkt versendet werden kann. Ich möchte aber nicht mit MAPI sondern lieber mit der David-API arbeiten.

    Vielen Dank im Voraus!
    Daniel


    Hallo auch,


    genau nach dieser lösung würde ich auch suchen - man kann zwar die eMail auf "Wartend" stellen - dann ist aber die Gefahr sehr groß, dass das versenden vergessen wird.....


    Bitte bitte, gibts da bereits schon eine lösung


    Hab folgenden Code in Access (VBA) hinterlegt:


    -----------------------------------------------------------------------------------------

    Dim oApp As DvApi32.IApplication
    Dim oAccount As DvApi32.Account
    Dim oArchive As DvApi32.Archive
    Dim oMailItem As DvApi32.MailItem
    Dim oAttachment As DvApi32.Attachment
    Dim l As Long
    Dim sAdresse As String
    Dim sAufDat As String
    Dim sHinweis As String
    sAdresse = "info@testadresse.de"
    sAufDat = "1.1.2010"
    sHinweis = "TEST-Hinweis"

    Set oApp = CreateObject("DVOBJAPILib.DvISEAPI")
    Set oAccount = oApp.LogOn("", "", "", "", "", "AUTH")
    Set oArchive = oAccount.GetSpecialArchive( _
    DvApi32.DvArchiveTypes.DvArchivePersonalOut)
    Set oMailItem = oArchive.NewItem(DvApi32.DvItemTypes.DvEMailItem)
    l = oMailItem.Recipients.Add(sAdresse, "MAIL", "")
    oMailItem.Subject = "Bestellbestätigung " & sAufDat
    oMailItem.BodyText.PlainText = "Anbei erhalten Sie Ihre " & _
    "Bestellbestätigung für Ihren " & _
    "Auftrag vom " & sAufDat
    oMailItem.Options.UserHold = False
    Set oAttachment = oMailItem.Attachments.Add("c:\Bestellung.pdf")
    oMailItem.Send
    -----------------------------------------------------------------------------------------

    Danke für eure Hilfe


    Gruß

    Stefan

  • Bitte bitte, gibts da bereits schon eine lösung


    kannst ja mal schauen, hier alle erweiterungen der autorisierten partner:

    hope that helps ^^

    "Programming today is a race between software engineers striving to
    build bigger and better idiot-proof programs, and the Universe trying
    to produce bigger and better idiots. So far, the Universe is winning."

  • Jockel:


    nee, leider gibts da nix was irgendwie passen würde..... leider :(


    Hoffe drauf, das mir Tobit selbst eine lösung schreibt bzw. mitteilt - ist ja evtl. nur ein anderer Befehl ;)

    Wenn ich was erfahre stells ich selbstverständlich auch hier rein - sollen ja alle was davon haben.... oder?! :)


    Gruß


    Stefan

  • so, hier die Lösung:


    Eine "Modul" mit z.B. den Namen "Tobit Versand" erstellen:

    Dann die Funktion mit übergabe der Parameter einfach wie folgt aufrufen (Beispiel):


    Zitat

    Call TobitVersand("email", "to.adresse@test.de", "cc.adresse@test.de", "Betreff", "Nachrichtentext", "c:\Anhang.pdf")


    was nicht benötigt wird (z.B. wird ja nicht immer die "Bcc"-Adresse benötigt) einfach mit "" auslassen

    Beispiel:


    Zitat

    Call TobitVersand("email", "to.adresse@test.de", "", "Betreff", "Nachrichtentext", "c:\Anhang.pdf")


    (gleiches geht natürlich beim Anhang, Nachrichtentext, Betreff, usw....)

    Hoffe das hilft einigen weiter - für Verbesserungsvorschläge bin ich natürlich auch gerne bereit....


    PS: funktioniert auf jeden Fall mit dem aktuellen Tobit David fx; Access 2003 und Windows7 Ultimate (und das beste, man braucht die DavidAPI nicht registriert haben da man diese ja nicht benötigt :) )


    Gruß


    Stefan

  • ach ja, was Tobit mir geschrieben hat (und ich somit zu der Lösung gekommen bin):



    falls es jemand benötigt.....


    Und nochmals Danke an TOBIT - ihr seit spitze!!!!!

    DANKE - DANKE - DANKE - DANKE - DANKE - DANKE - DANKE - DANKE :thumbup: :thumbup:

    Einmal editiert, zuletzt von edv-master (25. Mai 2010 um 23:43)

  • Hallo,

    vielen Dank für die Ausführung. Klappt auch gut, nur Anhänge werden nicht der Mail angehangen.... :(
    Verwende Access 2000, Windows 7 und Tobit David FX 2011.

    Hat vielleicht einer eine Idee oder alternativen Vorschlag?

    Danke
    Grüße
    Joe

  • Hallo Joe78


    Ich habe so ein ähnliches Problem mit Excel VBA gelöst.


    Hier ein Code-Auszug

    ChDrive "C:\"
    ChDir "c:\Program Files (x86)\Tobit InfoCenter\DVSMAPI\"
    Set myshell = CreateObject("Wscript.shell")
    Anhang = "C:\Pdf\Flansch.pdf"
    DvsExe = "dvsmapi.exe" & " " & Anhang
    myshell.Run DvsExe


    Dieser Code öffnet eine neue Nachricht (wenn Vorlagen für neue Nachrichten definiert sind, mit dieser Vorlage)

    Der Anhang wird angehängt, du musst nur noch eine Adresse, Betreff angeben und absenden


    hoffe, das hilft dir weiter


    Gruss meierjo

  • Moin moin,

    gibt es bei

    Zitat

    tic://message?type=tmail&to=ua@tobit.com&subject=Test&bodytext=Hallo%20dies%20ist%20ein%20test&attachment=E:\dumpbin.exe&ignoretemplate=1

    die Möglichkeit, mehrere Anhänge zu übergeben und/oder einen ganzen Ordnerinhalt?

    beste Grüße, Michael

  • Hallo Michael,

    ab David fx kann man den Befehl &attachment mehrmals wiederholen.


    Hallo allerseits,

    ich weiß, der Thread ist schon recht alt, aber ich habe eine Frage zu einem Beitrag: Ich nutze den Code von edv-master (25.05.2010 23:30 Uhr). Im Prinzip genau das, wonach ich schon seit Monaten gesucht hatte; allerdings habe ich noch einen "unschönen" Nebeneffekt: Trotz korrekter Nutzung der Groß- und Kleinschreibung werden aus meinem Datenbankformular leider als Betreff und Nachricht nur Kleinbuchstaben übergeben.

    An was kann das liegen bzw. was kann ich tun, um es zu ändern?

    Danke im Voraus für Eure Unterstützung!

    Gruß Nobby

Jetzt mitmachen!

Du hast noch kein Benutzerkonto auf unserer Seite? Registriere dich kostenlos und nimm an unserer Community teil!