Uso de Visual Basic Script , puede automatizar el proceso de envío de mensajes de correo electrónico a todas las personas en su lista de correo. Con un poco de creatividad, usted puede incluso tirar de la información para redactar el correo electrónico de una base de datos . Una tarea común , si usted está utilizando el script que le envíe informes de registro automatizado , es posible que desee incluir archivos adjuntos . Instrucciones .
1
abrir un editor de texto
2
Pega el siguiente para crear el mensaje :
establecer m = CreateObject ( " CDO.Message " )
m.Configuration.Fields.Item ( " http://schemas.microsoft.com/cdo/configuration/sendusing ") = 2
m.Configuration.Fields.Item ( " http://schemas.microsoft.com/cdo/configuration/smtpserver ") =" mail.your.com "
m.Configuration.Fields.Item ( " http://schemas.microsoft.com/CDO /configuración /SMTPAuthenticate ") = cdoBasic
m.Configuration.Fields.Item ( " http://schemas.microsoft.com/cdo/configuration/sendusername ") =" IDdeUsuario "
< p > m.Configuration.Fields.Item ( " http://schemas.microsoft.com/cdo/configuration/sendpassword ") = " sucontraseña "
m.Configuration.Fields.Item ( "http://schemas.microsoft.com /CDO /configuración /SMTPServerPort ") = 25
m.Configuration.Fields.Item ( " http://schemas.microsoft.com/cdo/configuration/smtpusessl ") = False
m.Configuration.Fields.Item ( " http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout ") = 60
m.Configuration.Fields.Update
< p> m.to = " recipient@sever.com "
m.from = " me@me.com "
m.subject = "Test"
m . TextBody = " Por favor, ver estos múltiples enviar varios archivos adjuntos , simplemente repita el comando apego add. Usted debe actualizar los campos de configuración para reflejar los datos de sus servidores de correo ajustes. Por ejemplo , si utiliza Gmail , entonces su servidor SMTP sería smtp.gmail.com y su nombre de usuario y contraseña sería el nombre de usuario y contraseña de su cuenta de Gmail.
3
Guarde su trabajo . puede ejecutar la secuencia de comandos , haga doble clic en él.
