Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Outlook2003 - eMail weiterleiten und Anhänge löschen

Frage Entwicklung VB for Applications

Mitglied: Zunaras

Zunaras (Level 1) - Jetzt verbinden

18.03.2009, aktualisiert 11:08 Uhr, 3634 Aufrufe

Hallo allerseits,

ich habe hier einen Code in Outlook2003. Mit dem kann ich per Button eMails intern weiterleiten.
Funktioniert auch alles sehr gut.
Meine Frage: Die Nachricht landet ja nach dem senden in meinem Ordner "gesendete Nachrichten". Kann man von dieser Nachricht die Anlage entfernen, wenn vorhanden?

01.
Function GetCurrentItem() As Object 
02.
Dim objApp As Outlook.Application 
03.
Set objApp = Application 
04.
On Error Resume Next 
05.
Select Case TypeName(objApp.ActiveWindow) 
06.
Case "Explorer" 
07.
Set GetCurrentItem = _ 
08.
objApp.ActiveExplorer.Selection.Item(1) 
09.
Case "Inspector" 
10.
Set GetCurrentItem = _ 
11.
objApp.ActiveInspector.CurrentItem 
12.
Case Else 
13.
End Select 
14.
End Function 
15.
 
16.
Sub Empfänger1() 
17.
 
18.
Dim objMail As Outlook.MailItem 
19.
 
20.
Set objItem = GetCurrentItem() 
21.
Set objMail = objItem.Forward 
22.
objMail.To = "empfänger1@intern.de" 
23.
objMail.Send 
24.
objItem.Delete 
25.
Set objItem = Nothing 
26.
Set objMail = Nothing 
27.
 
28.
End Sub
Gruß
Zunaras

PS: ich hoffe ich schreib hier im richtigen Bereich.
Ähnliche Inhalte
iOS
Kann Live Email Account auf Iphone nicht löschen (1)

Frage von srx2010 zum Thema iOS ...

Outlook & Mail
gelöst Bestimmte Anhänge bei E-mails mit Exchange 2010 löschen (5)

Frage von jojo0411 zum Thema Outlook & Mail ...

Outlook & Mail
gelöst Email Anhänge speichern VB Script aber nur bestimmte Dateitypen (Outlook) (4)

Frage von LindeUnimog zum Thema Outlook & Mail ...

Neue Wissensbeiträge
Tipps & Tricks

Wie Hackt man sich am besten in ein Computernetzwerk ein

(29)

Erfahrungsbericht von Herbrich19 zum Thema Tipps & Tricks ...

Humor (lol)

Bester Vorschlag eines Supporttechnikers ever: APC

(15)

Erfahrungsbericht von DerWoWusste zum Thema Humor (lol) ...

Windows Server

Exchange 2010 Active Directory und Windows Server 2016

(4)

Erfahrungsbericht von Herbrich19 zum Thema Windows Server ...

Heiß diskutierte Inhalte
Internet
gelöst Mitarbeiter surft auf unerwünschter Seite - Wie damit umgehen? (44)

Frage von sabines zum Thema Internet ...

Netzwerke
Wie erstelle ich ein Intranet (19)

Frage von Leonardnet zum Thema Netzwerke ...

LAN, WAN, Wireless
gelöst Eintägige Netzwerkunterbrechung trotz Backupleitung (15)

Frage von iAmbricksta zum Thema LAN, WAN, Wireless ...

Windows Server
Server 2012 R2 - Zugriff Verweigert bei jeglicher Tätigkeit (13)

Frage von DarkLevi zum Thema Windows Server ...