Foro de nombres de dominio Xyz

Al igual que con otros componentes, debe instalar o registrar el componente de correo Jmail, Jmail.dll, antes de usarlo. El método de registro específico es copiar el archivo Jmail.dll a un directorio en el disco duro (como C:\Jmail\Jmail.dll) y luego ejecutar el comando regsvr 32 C:\Jmail\jmail.dll.

2. Desinstalar

Desinstalar un componente es lo opuesto a instalarlo. Puede desinstalar los componentes instalados usando el parámetro /U, simplemente ejecute el comando regsvr 32 /U Jmail.dll.

Enviar correo electrónico usando el componente Jmail

Nombre de función: SendMail

Uso: Enviar correo electrónico usando el componente Jmail

Parámetro: MailtoAddress - Persona del destinatario DIRECCIÓN.

Nombre de correo: el nombre del destinatario.

Asunto - asunto

Cuerpo del correo electrónico - el contenido de la carta.

FromName - Nombre del remitente

MailFrom - Dirección del remitente.

Prioridad - la prioridad de las letras' * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *.

Nombre de la función: SendMail

Uso: utilice el componente Jmail para enviar correos electrónicos.

Parámetros: MailtoAddress: la dirección del destinatario.

Nombre de correo: el nombre del destinatario.

Asunto - asunto

Texto del correo - el contenido de la carta

FromName - el nombre del remitente

MailFrom - la dirección del remitente

Prioridad - la prioridad de la letra

'***************************** * ************************

Función EnviarCorreo(DirecciónDeCorreo, NombreDeCorreo, Asunto, Cuerpo De Correo, NombreDeRemitente, CorreoDesde, Prioridad)

Si ocurre un error, continúe con el siguiente paso

Atenuar JMail

Establecer JMail=Servidor. CreateObject("JMail. Message")

Si se produce un error,

SendMail = " ltbr gt lt李gtJMail componente

Borrado de errores

Función de salida

Terminará si...

JMail Charset="gb2312 " 'Codificación de correo

JMail.silent=true

JMail. ContentType = "text/html " 'Formato de texto de correo

Servidor SMTP utilizado para enviar correo

Si el servidor requiere autenticación SMTP, también necesitará. para especificar lo siguiente.

' jmail . nombre de usuario del servidor de correo = nombre de usuario del servidor de correo 'nombre de usuario de inicio de sesión

' jmail contraseña del servidor de correo = contraseña del servidor de correo 'contraseña de inicio de sesión

JMail.

MailDomain = MailDomain 'nombre de dominio (si inicia sesión con un nombre de usuario como "nombre@dominio.com", indique dominio.com.

Jmail. Agregue la dirección de correo electrónico del destinatario, nombre de correo electrónico'Persona del destinatario

JMail.Subject=Asunto

JMail.HMTLBody=MailBody 'Cuerpo del correo electrónico (formato HTML)

Texto JMail (formato de texto sin formato)

JMail.FromName=FromName 'Nombre del remitente

JMail.

Priority=Prioridad ' Nivel de correo, 1 es urgente, 3 es normal, 5 es bajo

JMail Enviar (servidor de correo)

SendMail =JMail Cerrar

Establecer JMail = Ninguno

Finalizar función

Cómo. use el componente Jmail para enviar correos electrónicos

JMail es actualmente el componente de envío de correo electrónico más completo, estable y más eficiente; algunos componentes están instalados en nuestros servidores espaciales de la serie Windows. El siguiente es un ejemplo del uso de este componente. para enviar correos electrónicos:

Ejemplo 1:

lt

Establecer msg = Server.CreateObject("JMail.Message")

msg.silent = true

MSG.Record = true

MSG . Charset = "gb2312 "

nombre de usuario del servidor de correo = " sales @ ABC . com " 'Esta es su cuenta de inicio de sesión de correo electrónico, cámbiela a su propio inicio de sesión de correo electrónico cuando utilice Cuenta.

MSG. MailServerPassword = "56789 " 'Esta es su dirección de correo electrónico.

MSG. com "Correo electrónico del remitente

MSG. FromName = "XXX empresa " 'Nombre del remitente.

MSG. Agregar destinatario "tech@abc.com" Correo electrónico de la persona del destinatario

MSG. Asunto = "Prueba de envío de Jmail" 'Asunto del correo electrónico.

MSG. Enviar ("mail.abc.com") 'Dirección del servidor SMTP

msg.close()

Establecer mensaje = Ninguno

gt

Ejemplo 2:

lt

nombre=request.form("nombre")

email=request.form("correo electrónico")

note=request.form("nota ")

Establecer msg = Servidor. CreateObject("JMail.Message")

msg.silent = true

MSG. record=true

MSG.

Charset = "gb2312 "

msg. nombre de usuario del servidor de correo = " sales @ ABC . com " 'Esta es su cuenta de inicio de sesión de correo electrónico, cámbiela por su propia cuenta de inicio de sesión de correo electrónico cuando la utilice.

MSG. MailServerPassword = "56789 " 'Esta es su contraseña de inicio de sesión de correo electrónico. Cámbielo a su propia dirección de correo electrónico cuando lo utilice.

MSG. De = Correo electrónico 'Correo electrónico del remitente

MSG. FromName = nombre 'Nombre del remitente

MSG. Agregue el correo electrónico del destinatario "tech@abc.com"

MSG. Asunto = "Prueba de envío de Jmail" 'Asunto del correo electrónico.

MSG. Cuerpo = "Esto está hecho de";nombre y título. ¿"Correo electrónico del pedido, mensaje del pedido"? e amp" " "Texto de correo electrónico

MSG. Enviar ("mail.abc.com")' dirección del servidor SMTP

msg.close()

Configuración mensaje=ninguno

gt

================================= == =============================

El proceso de llamar a Jmail:

Email (email)

Dim JMail

Set jmail = server.createobject("jmail.message")' Crea un objeto para enviar correo.

" Jmail.silent = TRUE" enmascara errores de excepción y devuelve dos valores J, FALSE y TRUE.

' Jmail.logging = true 'Habilita el registro de correo.

Jmail.Charset = "GB2312 " 'El código de texto del correo electrónico es GB.

Jmail El formato del correo electrónico es HTML.

Jmail "AddRecipient email" La dirección del destinatario del correo electrónico. .

jmail . from = " heyi Tang @ heyi Tang . net " 'La dirección de correo electrónico del remitente

jmail nombre de usuario del servidor de correo = " admin " 'El nombre de usuario requerido para iniciar sesión. en el servidor de correo. /p>

jmail . contraseña del servidor de correo = " pa word " 'La contraseña requerida para iniciar sesión en el servidor de correo

Jmail. Se ha respondido al anhelo por el Foro Shenying"' El título del correo electrónico.

Jmail.Body = mailbody 'El contenido del correo electrónico.

Jmail. Programa, 1 es el más rápido, 5 es el más lento, el valor predeterminado es 3.

Jmail. Send("mail.heyitang.net")' realiza el envío de correo electrónico (a través de la dirección del servidor de correo p>Si ocurre un error, entonces<). /p>

SendMail=err.description

respuesta.escribir descripción del error

Error borrado

SendMail= "OK "

Otro

SendMail= "OK"

Respuesta.

Escribe "OK"

Terminará si...

Jmail. Close()'Cierra el objeto.

Establecer JMail = Ninguno

Conector final

Al enviar una carta:

Mailbody= = "Una carta de prueba"

Llame a jmail(heyitang@heyitang.net)

El mensaje masivo es similar a:

Mailbody= = "Una carta de prueba"

Para Todos los usuarios envían mensajes en bucle.

if RS("correo electrónico del usuario") lt;gt""Entonces

email=rs("correo electrónico del usuario")

Llame a jmail(correo electrónico)

rs.movext

Anillo

========================= == ==========

Nota importante:

Encontré que muchos artículos hablaban sobre Jmail, pero no hablaban sobre la autenticación Smtp.

Muchos correos electrónicos enviados por el programa Asp se devuelven debido a problemas de autenticación Smtp.

lt

Dim Jmail

establecer Jmail = servidor . createobject(" Jmail.Message")

Jmail. Juego de caracteres = "gb2312 "

Jmail. Silencioso=Verdadero

Jmail. Prioridad = 3

jmail .mail server nombre de usuario = " xyp@chinalabs.com " 'Aquí, cambie a su cuenta de autenticación SMTP.

jmail .contraseña del servidor de correo = " * * * * * * * ", ingrese aquí su contraseña de autenticación SMTP.

Jmail. La dirección de correo electrónico del remitente.

Jmail. FromName = "Nombre del remitente"'

Jmail. Asunto = "Asunto de la carta"'

Jmail. Agregue la dirección del destinatario "abc@abc.com.

Jmail. "body = Mailbody" El parámetro Mailbody es el cuerpo de la carta.

Jmail. Send("xxx .xyz. com ")'Rellene aquí el servidor que envía correos electrónicos, como mail.8sea.com, que debe corresponder a la información de autenticación SMTP.

Establezca Jmail = Ninguno