En esta practica vamos a ver como facilmente podemos enviar un e-mail desde nuestro Scada en Factory Talk View, esto es posible debido al uso de VBA (Visual Basic for Aplication). El objetivo es enviar un e-mail cuando se ha producido una determinada Alarma en el Sistema, vamos a considerar que la Alarma es el nivel de un Deposito y vamos a utilizar la estructura de la definición de una Alarma Digital como vimos en la practica anterior.

Hemos insertado un objeto del tipo Numeric Display, que tranquilamente puede estar oculto, lo que previamente hacemos es asociarle el bit de Alarma activa.

La función en cuestión es la siguiente, declaramos una variable del tipo CDO.Message y una vez declarada y dada de alta, lo que hacemos es pasarle los parametros del Servidor SMTP, en este caso Gmail y los argumentos que usamos cuando enviamos un correo.

Una vez definido esto, con el botón derecho abrimos el editor de VBA Code, y lo que vamos a crear es una función para enviar el mail, pero para ello previamente tenemos que agregar una referencia al objeto Microsoft CDO for Windows 2000 Library, esto lo hacemos desde Tools -> References y la agregamos.

Ahora vamos a probar que funciona correctamente y vamos a forzar nuestra alarma, al cambiar a 1 se ejecuta el evento Change del numericDisplay1, que a su vez hace la llamada a la funcióne e-mail

Y si comprobamos el correo, aqui lo tenemos...

Ya hemos definido nuestra función, ahora tenemos que hacer su llamada, y lo vamos ha hacer cuando el valor de nuestra Alarma cambie a 1, esto significara que se ha activado, seleccionamos el objeto NumericDisplay1 y seleccionamos el evento Change, que es el que nos interesa, el codigo que hacemos es el siguiente, la variable interna de la función Email, podria ser una variable interna del Scada y a su vez configurarla como una alarma en el caso de que de error al enviar el mail ...

Actualización 26-3-2015 "Si al enviar el mail te sale un error y estas usando Gmail, revisa el siguiente link"