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
GELÖST

VBA - automatischer Mailversand (Sicherheitsprüfung umgehen)

Frage Entwicklung VB for Applications

Mitglied: 106543

106543 (Level 2)

19.04.2013 um 10:10 Uhr, 6680 Aufrufe, 6 Kommentare

Hi Leute,

habe folgendes Problem, bei meinem eigenen automatischen Mailversand ;)
Und zwar habe ich eine Mail-Automatisierung in einen VBA-Quellcode eingebunden.
01.
Dim sAbsender As String 
02.
Dim Outlook As Object 
03.
Set Outlook = CreateObject("Outlook.Application") 
04.
 
05.
sAbsender = [ABSENDER ON BEHALF] 
06.
With Outlook.createitem(0) 
07.
    .SentOnBehalfOfName = sAbsender 
08.
    .Recipients.Add sEmpfänger 
09.
    .Subject = sBetreff 
10.
    .Body = sNachricht 
11.
    .ReadReceiptRequested = False 
12.
    .display 
13.
End With 
14.
 
15.
Set Outlook = Nothing
der Code funktioniert einwandfrei, die Mail wird auch erstellt und angezeigt, wie ich es will, allerdings kommt bei mir jedes mal die Abfrage (vor dem Anzeigen)
01.
Ein Programm versucht auf Ihre in Outlook gespeicherten E-Mail-Adressen zuzugreifen. Möchten Sie dies erlauben?
Dort kann ich nur auswählen, dass der Zugriff für maximal 10 min erlaubt sein soll.
Gibt´s da irgend ein Workaround oder eine Möglichkeit, das abzustellen?

Grüße
Exze
Mitglied: colinardo
19.04.2013, aktualisiert 15.10.2014
HI Exzellius,
welche Outlook-Version verwendest du ?
Ab Outlook 2007 hast du in den Optionen von Outlook > Sicherheitscenter > Programmgesteuerter Zugriff die Möglichkeit die Warnmeldungen abzuschalten.

Grüße Uwe
Bitte warten ..
Mitglied: 106543
19.04.2013 um 12:19 Uhr
Hi Colinardo,

leider handelt es sich um Outlook 2003 und einen XP-PC
kennst du eine andere Möglichkeit ?

Grüße
Exze
Bitte warten ..
Mitglied: colinardo
19.04.2013 um 12:35 Uhr
Wenn du dein Outlook über Exchange nutzt könnte folgendes helfen:
http://support.microsoft.com/kb/263297/en-us

ansonsten gibt es glaub ich nur eine Lösung über zusätzliche Plugins:
http://mapilab.com/de/outlook/security/
Bitte warten ..
Mitglied: 106543
19.04.2013 um 12:46 Uhr
Hi Colinardo,

danke für die Mühe
nein kein Exchange leider und externe Tools fallen auch flach.
Naja werd mich wohl damit abfinden müssen, dass die User hier öfters mal klicken müssen und angesichts der Arbeit, die ich ihnen abnehme durch das Tool solllten sie sich lieber nicht bschweren ;)

Grüße
Exze

/SOLVED
Bitte warten ..
Mitglied: Pjordorf
19.04.2013 um 15:02 Uhr
Hallo,

Zitat von 106543:
01.
> Set Outlook = CreateObject("Outlook.Application")
Hier wird die Sicheheitsfrage getriggert.
Nutze CDO anstelle von MAPI. Siehe auch http://support.microsoft.com/kb/161833/de oder http://www.msxfaq.de/code/mapicdo.htm. CDO muss bei Office 2003 Manuell nachinstalliert werden sofern du eben nicht bei der Office Installation "alles von Arbeitsplatz ausführen" gewählt hast. wenn du noch eine Dienst daraus machst dann bleibt die Sicherheitsfrage garantiert weg. Excel VBA Beispiel um per (CDO) SMTP und somit ohne Sicherheitsfrage ein Mail zu senden http://www.rondebruin.nl/win/s1/cdo.htm. Unter nutzung einer anderen MAPI ist es auch möglich, Redemption ist dein Suchbegriff, ist aber Fremdsoftware http://www.dimastr.com/redemption/home.htm

Gruß,
Peter
Bitte warten ..
Mitglied: 106543
22.04.2013 um 10:19 Uhr
Hi,

Zitat von Pjordorf:

CDO muss bei Office 2003 Manuell nachinstalliert werden

und da liegt der Hund begraben, weil ich keine Installationen ansetzen kann
bin nur ein armer, kleiner Azubi ;D und soll ein Tool basteln, was automatisiert eine Mail verschickt.

Grüße
Exze
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(1)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
VB for Applications
Excel VBA Sortierung von Daten (5)

Frage von easy4breezy zum Thema VB for Applications ...

Microsoft Office
gelöst Excel-Formel oder VBA (7)

Frage von nicki01 zum Thema Microsoft Office ...

iOS
Apple: Aktivierungssperre des iPads lässt sich umgehen

Link von runasservice zum Thema iOS ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
gelöst Server erkennt Client nicht wenn er ausserhalb des DHCP Pools liegt (28)

Frage von Mar-west zum Thema LAN, WAN, Wireless ...

Outlook & Mail
Outlook 2010 findet ost datei nicht (18)

Frage von Floh21 zum Thema Outlook & Mail ...

Windows Server
Server 2008R2 startet nicht mehr (Bad Patch 0xa) (18)

Frage von Haures zum Thema Windows Server ...