Cuestión : confirmar el email antes de enviar

Hay una manera de pedir “es usted que usted quiere sure enviar este email?” ¿confirmación antes de enviar un mensaje en MS Outlook 2007? class= del

Respuesta : confirmar el email antes de enviar


Para hacer que una caja suba pidiendo, “usted quiere enviar” en la ventana principal de la perspectiva, prensa Alt+F11

en session> de la perspectiva de los outlook>this de la oficina de project1>microsoft

pegar el código siguiente y excepto y cercano.

Hará que un mensaje aparece en la ventana principal cuando usted envía (apenas alt+tab para verlo)

*note1: Si no trabaja inmediatamente, bajar su seguridad macra



*note2: otra manera es poner simplemente, “dontsendyet” en a: la caja (sin las cotizaciones) y ella no enviarán a menos que usted la quite.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:

Opción explícita
objInspectors déviles de WithEvents como inspectores
objMyNewMail dévil de WithEvents como MailItem

Application_Startup secundario privado ()
Fijar los objInspectors = Application.Inspectors
Terminar el submarino

Application_Quit secundario privado ()
Fijar los objInspectors = nada
Fijar el objMyNewMail = nada
Terminar el submarino

objInspectors_NewInspector secundario privado (inspector de ByVal como inspector)
Si el olMail <> de Inspector.CurrentItem.Class entonces sale el submarino
Fijar el objMyNewMail = Inspector.CurrentItem
Terminar el submarino

objMyNewMail_Send secundario privado (cancelación como boleana)
¿Si MsgBox (“está usted seguro usted quiere enviar este mensaje? ”, _ del vbYesNo + del vbQuestion
, “ENVIAR LA CONFIRMACIÓN”) = vbNo entonces
La cancelación = verdad
Terminar si
Terminar el submarino
Otras soluciones  
 
programming4us programming4us