Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Email bleibt im Postausgang
zurück: Kalender in Office 03 ansprechen weiter: Regel -> MailAnhang in Outlookordner verschieben Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Bitte Status wählen ! Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
dh1sbg
Im Profil kannst Du frei den Rang ändern


Verfasst am:
03. Dez 2006, 20:50
Rufname:

Email bleibt im Postausgang - Email bleibt im Postausgang

Nach oben
       Version: Office 2003

Hallo!

ich versende eine Email nach Outlook aus Access 2003 heraus, die dann aber im Postausgang "stecken" bleibt. Die Email ist nicht kursiv, sondern normal - nach "senden und empfangen bleibt die Email trotzdem stehen - ich sehe keine Fehlermeldung in Outlook.

WO liegt mein Denkfehler?

Vielen Dank für jede Hilfe
Bruno

Hier der Code
Code:

   Dim myOutlook As Outlook.Application
   Set myOutlook = New Outlook.Application
   
   Dim myNameSpace
   Set myNameSpace = myOutlook.GetNamespace("MAPI")
   myNameSpace.Logon "Test_account", , True, True
   
   Dim myMail As Outlook.MailItem
   Set myMail = myOutlook.CreateItem(olMailItem)
     
   With myMail
     
      Dim olItem As Outlook.ContactItem
         Set olItem = myOutlook.CreateItem(olContactItem)
         olItem.Email1Address = "test@test.de"
         olItem.FullName = "VorName NachName"
         .To = olItem.Email1Address
      Set olItem = Nothing
     
      txtSubject.SetFocus
      .Subject = txtSubject.Text
     
      txtBody.SetFocus
      .Body = txtBody
      myMail.Send
      'myMail.Display
     End With
   myNameSpace.Logoff
   
   Set myNameSpace = Nothing
   Set myMail = Nothing
   
AndyGrothe
Softwareentwickler (VB, VBA, VBS, VB.NET)


Verfasst am:
04. Dez 2006, 21:15
Rufname:
Wohnort: 97775 Burgsinn

AW: Email bleibt im Postausgang - AW: Email bleibt im Postausgang

Nach oben
       Version: Office 2003

hallo,

sorge dafür, das die email im ordner "Entwürfe" gespeichert wird. anschließend gehst du dann jede mail im ordner "Entwürfe" durch und sendes sie.

hier ein beispiel:

Code:
    Dim oMail As Outlook.MailItem

    'eMail erstellen und im Ordner "Entwürfe" speichern
    Set oMail = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderDrafts).Items.Add
    oMail.To = "test@test.de"
    oMail.Subject = "betreff"
    oMail.Body = "text"
    oMail.Save
   
    'alle EMails im Ordner "Entwürfe" senden
    For Each oMail In Application.GetNamespace("MAPI").GetDefaultFolder(olFolderDrafts).Items
        oMail.Send
    Next

_________________
Outlook-AddIns die den Büroalltag erleichtern.
Individuelle Erstellung von VBScripten, Makros oder AddIns
dh1sbg
Im Profil kannst Du frei den Rang ändern


Verfasst am:
04. Dez 2006, 22:16
Rufname:


AW: Email bleibt im Postausgang - AW: Email bleibt im Postausgang

Nach oben
       Version: Office 2003

ja, das funktioniert! SPITZE! Lob!

Bruno
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Outlook Mail: postausgang problem - Mails bleiben im Postausgang 39 jhaustein 81449 22. Feb 2013, 16:55
Gast1 postausgang problem - Mails bleiben im Postausgang
Keine neuen Beiträge Outlook Mail: Office 2003: Postausgang wo löschen? 7 Gast 4260 19. Dez 2011, 19:25
Gast Office 2003: Postausgang wo löschen?
Keine neuen Beiträge Outlook Mail: Gesendete Mails/Postausgang runterladen 4 ThomasB81 7220 21. Dez 2006, 14:00
kraemer Gesendete Mails/Postausgang runterladen
Keine neuen Beiträge Outlook Mail: t-online email mit gmx einwahl abholen??? 3 Karsten Grobbel 3351 24. Feb 2005, 11:03
Christi@n t-online email mit gmx einwahl abholen???
Keine neuen Beiträge Outlook Mail: Email Versenden - Fehlermeldung 13 Mario 6603 02. Feb 2005, 13:21
Christi@n Email Versenden - Fehlermeldung
Keine neuen Beiträge Outlook Mail: gesendet Objekte nach verschiedenen eMail accounts aufteilen 19 derchef 3448 01. Feb 2005, 17:42
Gast gesendet Objekte nach verschiedenen eMail accounts aufteilen
Keine neuen Beiträge Outlook Mail: OFFENER Briefumschlag/email mit 2x "SENDEN" bestät 2 Freddi 1720 29. Jan 2005, 15:51
Freddi OFFENER Briefumschlag/email mit 2x "SENDEN" bestät
Keine neuen Beiträge Outlook Mail: E-Mail nach 3Tagen weiterleiten 1 coriolanus 720 14. Jan 2005, 15:58
wolf-it E-Mail nach 3Tagen weiterleiten
Keine neuen Beiträge Outlook Mail: Sortierung bei Anzeige eigener Kontakte bei Email senden 6 Sushi 1412 08. Dez 2004, 15:04
wolf-it Sortierung bei Anzeige eigener Kontakte bei Email senden
Keine neuen Beiträge Outlook Mail: Symantec E-Mail Proxy 0 andy1169 1920 04. Okt 2004, 19:23
andy1169 Symantec E-Mail Proxy
Keine neuen Beiträge Outlook Mail: Mails bleiben im Postausgang statt gesendete Objekte 1 zu 5193 29. Sep 2004, 11:32
Guest Mails bleiben im Postausgang statt gesendete Objekte
Keine neuen Beiträge Outlook Mail: Lesebestätigung im Postausgang... wie löschen?!? 11 Peggy 9144 01. Sep 2004, 11:16
Gast Lesebestätigung im Postausgang... wie löschen?!?
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: PHP JavaScript