Article View: pl.comp.lang.vbasic
Article #104361Makro Outlook - sprawdzenie przed wysłaniem
From: E
Date: Mon, 26 Oct 2009 19:18
Date: Mon, 26 Oct 2009 19:18
18 lines
1573 bytes
1573 bytes
Witam
Szanowni grupowicze, stoję przed wyzwaniem napisania makra do MS Outlook.
Makro to ma na celu zapobieganie przypadkowemu wysłaniu mail'i.
Chciałbym, aby po przycisnięciu przycisku wyślij pojawiło się pytanie: Czy
chcesz wysłać maila? Napisałem kod jak poniżej, ma on jednak wadę, że
pytanie pojawia się pod oknem wysyłanej wiadomości (w oknie MS Outlook).
Proszę o pomoc w rozwiązaniu problemu.
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Cancel = True
If MsgBox("Czy jesteś pewien, że chcesz wysłać wiadomość ?", vbQuestion +
vbYesNo) = vbYes Then
Cancel = False
End If
End Sub
Nies
Technical Details
Message-ID:
<hc4sqc$8j3$1@news.onet.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.nask.pl!news.nask.org.pl!news.onet.pl!not-for-mailShow Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.gazeta.pl!newsfeed.pionier.net.pl!news.nask.pl!news.nask.org.pl!news.onet.pl!not-for-mail From: "E" <s@poczta.onet.pl> Newsgroups: pl.comp.lang.vbasic Subject: Makro Outlook - sprawdzenie przed wysłaniem Date: Mon, 26 Oct 2009 20:18:58 +0100 Organization: http://onet.pl Lines: 20 Message-ID: <hc4sqc$8j3$1@news.onet.pl> NNTP-Posting-Host: ut146.internetdsl.tpnet.pl X-Trace: news.onet.pl 1256584844 8803 80.55.149.146 (26 Oct 2009 19:20:44 GMT) X-Complaints-To: niusy@onet.pl NNTP-Posting-Date: Mon, 26 Oct 2009 19:20:44 +0000 (UTC) X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2900.5843 X-RFC2646: Format=Flowed; Original X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.5579 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit