[VBS] Envío de mail

Hola a todos! Me ha costado volver de las vacaciones y ponerme a publicar de nuevo. Hay mucha faena y nuevos proyectos!

Voy a empezar el primer post del año publicando una forma de notificar resultados de comprobaciones que hagamos en scripts a traves de VBS por mail.

Es sencillo y útil. Ahora mismo lo vengo utilizando a través de una Schelude Policy en OVO que guarda el output en un .txt que adjunta y envía por mail, ya que el output no puedo mostrarlo por consola debido al tamaño del mismo.

Simplemente hay que modificar "servidor.de.mail" por la IP o nombre del servidor de correo y los campos de Subject, From,To etc para personalizarlo.


En mi caso, tengo una Schelude Task en OVO que lee un fichero XML en busca de errores. Si encuentra un error en el fichero, se ejecuta con argumento 1 el script de envío de mail. Para el argumento 1 lo he configurado para que se envíe a dos direcciones. De lo contrario se envía a 1, que es por defecto cada 3 horas. En ambas recoge una Query de SQL y la envía por mail.

SI no deseamos enviar nada adjunto, simplemente modificamos objMessage.TextBody y ahí podemos poner lo que queramos o enviar lo que recogemos de una variable, por ejemplo.

Y de esta manera sacamos mucho provecho, hay que ser creativos =D