Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
384to388
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
384to388
384to388
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Outlook Meldung

Outlook Meldung
23.02.2004 10:43:23
MichaelS
Moin,
hat jemand eine AHnung von Euch, ob es per API möglich ist, diese blöde Outlook Meldung ("Jemand versucht...") zu umgehen bzw. automatisch "Ja" anzunehmen?
Ich weiß, es geht mit ClickSetupExpress z.B.... aber nicht jeder darf diese Software auf seinem dienstlichen Rechner installieren...
Michael

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Outlook Meldung
23.02.2004 12:02:13
Ramses
Hallo
Nein, meines Wissens keine Chance,...deswegen wurde das ganze ja eingebaut, auch eine Umgehung sollte/dürfte nicht möglich sein.
Deshalb wäre ich an der anderen Software schon interessiert. Wo gibt es die ?
Gruss Rainer
AW: Outlook Meldung
23.02.2004 12:17:56
MichaelS
Hi Ramses,
danke für Deine Message.
Es heißt natürlich ClickYesExpress und nicht ClickSetupExpress.
Diese gibt es u.a. HIER
try it
MichaelS
AW: Outlook Meldung
23.02.2004 13:17:58
Ramses
Hallo
wäre bloss noch gut zu wissen, was das programm sonst noch abfängt ;-)
Es wartet einfach im Hintergrund bis Outlook diese Dialogbox öffnet und bestätigt dieses.
Nur wenn es das kann, was macht es sonst noch ?
Nein,... Danke :-)
Grûss Rainer
Anzeige
AW: Outlook Meldung
25.02.2004 15:50:09
MichaelS
Hi Ramses,
und es geht doch....!!!!!!!!!!!!!!!!!!!!!!!
guckst Du...


Dim objOL As New Outlook.Application
Dim objMail As MailItem
Set objOL = New Outlook.Application
Set objMail = objOL.CreateItem(olMailItem)
With objMail
    .To = "Ramses_II@my-mail.de"
    .Subject = "Automatiesierte Testmail"
    .Body = "Dies ist eine automatiesierte Testmail"
    .Display
End With
Application.SendKeys "%s"
Set objMail = Nothing
Set objOL = Nothing


Den Code habe ich von einem Bekannten erhascht... hehe
cu
Michael
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige