Confirm before sending?

I have a client that accidentally sends e-mails before completing them on a
regular basis. They would actually like confirmation before sending any
e-mail.

I found this reference for VB code but I don't know how to edit or apply it
as I know NOTHING about VB
-
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim intRes As Integer
Dim strMsg As String
strMsg = "Do you really want to send this message?"
intRes = MsgBox(strMsg, vbYesNo + vbDefaultButton1, "Confirm Send ")
If intRes = vbNo Then
Cancel = True
End If
End Sub

Open the VBA editor (alt+f11), ensure you see the project explorer (ctrl+r),
double click the "ThisOutlookSession" module to open it, paste the code into
that module.

If the code won't be executed, check the security settings in Outlook
(Tools/Macros/Security).

--
Best regards
Michael Bauer - MVP Outlook
Category Manager - Manage and share your categories:
SAM - The Sending Account Manager:
http://www.vboffice.net/product.html?lang=en


Am Fri, 2 Apr 2010 18:59:49 -0700 schrieb boe:

I have a client that accidentally sends e-mails before completing them on
a
regular basis. They would actually like confirmation before sending any
e-mail.

I found this reference for VB code but I don't know how to edit or apply
it
as I know NOTHING about VB
-
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim intRes As Integer
Dim strMsg As String
strMsg = "Do you really want to send this message?"
intRes = MsgBox(strMsg, vbYesNo + vbDefaultButton1, "Confirm Send ")
If intRes = vbNo Then
Cancel = True
End If
End Sub

Thanks! - How do I uninstall it?

"Michael Bauer [MVP - Outlook]" wrote in message
...


Open the VBA editor (alt+f11), ensure you see the project explorer
(ctrl+r),
double click the "ThisOutlookSession" module to open it, paste the code
into
that module.

If the code won't be executed, check the security settings in Outlook
(Tools/Macros/Security).

--
Best regards
Michael Bauer - MVP Outlook
Category Manager - Manage and share your categories:
SAM - The Sending Account Manager:
http://www.vboffice.net/product.html?lang=en


Am Fri, 2 Apr 2010 18:59:49 -0700 schrieb boe:

I have a client that accidentally sends e-mails before completing them on
a
regular basis. They would actually like confirmation before sending
any
e-mail.

I found this reference for VB code but I don't know how to edit or apply
it
as I know NOTHING about VB
-
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim intRes As Integer
Dim strMsg As String
strMsg = "Do you really want to send this message?"
intRes = MsgBox(strMsg, vbYesNo + vbDefaultButton1, "Confirm Send ")
If intRes = vbNo Then
Cancel = True
End If
End Sub

Hm, one option is to remove Outlook or even the entire Office and make a
clean installation of it. Another one, which I'd prefer, is to just delete
the code you had pasted as descriped.

--
Best regards
Michael Bauer - MVP Outlook
Category Manager - Manage and share your categories:
SAM - The Sending Account Manager:
http://www.vboffice.net/product.html?lang=en


Am Sat, 3 Apr 2010 08:27:20 -0700 schrieb boe:

Thanks! - How do I uninstall it?

"Michael Bauer [MVP - Outlook]" wrote in message
...


Open the VBA editor (alt+f11), ensure you see the project explorer
(ctrl+r),
double click the "ThisOutlookSession" module to open it, paste the code
into
that module.

If the code won't be executed, check the security settings in Outlook
(Tools/Macros/Security).

--
Best regards
Michael Bauer - MVP Outlook
Category Manager - Manage and share your categories:
SAM - The Sending Account Manager:
http://www.vboffice.net/product.html?lang=en


Am Fri, 2 Apr 2010 18:59:49 -0700 schrieb boe:

I have a client that accidentally sends e-mails before completing them
on
a
regular basis. They would actually like confirmation before sending
any
e-mail.

I found this reference for VB code but I don't know how to edit or apply
it
as I know NOTHING about VB
-
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As
Boolean)
Dim intRes As Integer
Dim strMsg As String
strMsg = "Do you really want to send this message?"
intRes = MsgBox(strMsg, vbYesNo + vbDefaultButton1, "Confirm Send ")
If intRes = vbNo Then
Cancel = True
End If
End Sub

Thanks - just open alt f11 to delete the code?

"Michael Bauer [MVP - Outlook]" wrote in message
...


Hm, one option is to remove Outlook or even the entire Office and make a
clean installation of it. Another one, which I'd prefer, is to just delete
the code you had pasted as descriped.

--
Best regards
Michael Bauer - MVP Outlook
Category Manager - Manage and share your categories:
SAM - The Sending Account Manager:
http://www.vboffice.net/product.html?lang=en


Am Sat, 3 Apr 2010 08:27:20 -0700 schrieb boe:

Thanks! - How do I uninstall it?

"Michael Bauer [MVP - Outlook]" wrote in message
...


Open the VBA editor (alt+f11), ensure you see the project explorer
(ctrl+r),
double click the "ThisOutlookSession" module to open it, paste the code
into
that module.

If the code won't be executed, check the security settings in Outlook
(Tools/Macros/Security).

--
Best regards
Michael Bauer - MVP Outlook
Category Manager - Manage and share your categories:
SAM - The Sending Account Manager:
http://www.vboffice.net/product.html?lang=en


Am Fri, 2 Apr 2010 18:59:49 -0700 schrieb boe:

I have a client that accidentally sends e-mails before completing them
on
a
regular basis. They would actually like confirmation before sending
any
e-mail.

I found this reference for VB code but I don't know how to edit or
apply
it
as I know NOTHING about VB
-
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As
Boolean)
Dim intRes As Integer
Dim strMsg As String
strMsg = "Do you really want to send this message?"
intRes = MsgBox(strMsg, vbYesNo + vbDefaultButton1, "Confirm Send ")
If intRes = vbNo Then
Cancel = True
End If
End Sub