Outlook vor dem Versenden anzeigen

  • VB.NET
  • .NET (FX) 3.0–3.5

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von SaturnV.

    Outlook vor dem Versenden anzeigen

    Hallo und frohe Ostern!

    Brauche wieder mal eure kurze Hilfe.

    Habe folgenden Code in einen Button, der auch funktioniert. Nun möchte ich aber, dass Outlook vor dem Versenden geöffnet wird, damit ich noch Text im Body ergänzen kann.

    VB.NET-Quellcode

    1. Dim olApp As Object
    2. Dim oItem As Object
    3. olApp = CreateObject("Outlook.Application")
    4. oItem = olApp.CreateItem(0)
    5. With oItem
    6. .Subject = "XXX"
    7. .To = "XXXX"
    8. .Body = "XXX"
    9. ' .send()
    10. End With


    Vielen Dank!
    Hallo!
    Gut Ding braucht Weile. Hier die Lösung.

    VB.NET-Quellcode

    1. Dim Outl As Object
    2. Outl = CreateObject("Outlook.Application")
    3. If Outl IsNot Nothing Then
    4. Dim omsg As Object
    5. omsg = Outl.CreateItem(0)
    6. omsg.To = [email=abc@def.xx]abc@def.xx[/email] 'Empfänger
    7. omsg.bcc = [email=XX@XX]XX@XX[/email] 'cc
    8. omsg.subject = "bla bla" 'Betreff
    9. omsg.body = "blabla" 'Text
    10. omsg.Attachments.Add("c:\xy\abc.txt") 'Anlage anfügen
    11. omsg.Display(True)
    12. End If