Puntos de bonificación si desea utilizar CGI para enviar la información del formulario completado por otra persona a mi correo electrónico.
Establecer correo electrónico = CreateObject("CDO.Message")
Correo electrónico. De = "yyy@yyy.com" su correo electrónico Dirección de correo electrónico.
Correo electrónico "Para = "xxx@xxx.com" Dirección de envío.
Correo electrónico. Asunto = "prueba" 'Asunto.
Correo electrónico. Textbody = "test " 'Completa lo que quieres escribir.
Correo electrónico. AddAttachment Archivo adjunto "Enviar archivo adjunto si es necesario".
Usa el correo electrónico. Configuración.Campo
. proyecto(espacio de nombres&"envío")=2
. project(namespace&" smtpserver") = "smtp.yyy.com " 'Servidor de correo saliente
. proyecto(espacio de nombres&"smtpserverport")=25
. items(espacio de nombres&" smtpauthenticate")=1
. items(namespace&" sendusername")="xxxx " 'Nombre de usuario de correo electrónico
. item(espacio de nombres&" enviarcontraseña") = "xxxxx " 'Contraseña
. Actualizar
Finalizar con
correo electrónico. Enviar