Red de conocimiento informático - Material del sitio web - ¿Cómo iniciar sesión usando el correo electrónico en PB?

¿Cómo iniciar sesión usando el correo electrónico en PB?

Por favor consúltelo.

mailsession mses

mailmessage mmsg

mailreturncode mreturn

// Generar objeto de sesión de correo mses

mses = crear sesión de correo

//.//mailLogon

// mreturn = mses.maillogon(mailnewsession!)

mreturn = mses.mailLogon('a', '',mailNewSessionWithDownLoad!)

// mreturn = mses.mailLogon('yx','',mailNewSessionWithDownLoad!)

// mreturn = mses.mailLogon('yx', '',mailNewSessionWithDownLoad!)messagebox("Error", "Error al iniciar sesión en el correo, ¡háganoslo saber de otra manera! ~n "+"XXXX@163.com")

return

end if

//// Abre la ventana de dirección de correo electrónico para obtener la dirección del destinatario.

La dirección y el nombre son matrices de estructuras colocadas en mmsg

//mreturn =mses.mailaddress(mmsg)

//if mreturn <> mailreturnsuccess then

///messagebox("error ", "Hubo un error con la dirección de correo electrónico, ¡háganoslo saber de otra manera!~n "+"XXXX@163.com")

/ /return

//

//end if

/// Ingrese el contenido del editor multilínea mle_1 en la ventana w_mai1 en el campo de texto de nota de mmsg

//Establecer algunos valores de atributos del objeto de información de correo

mmsg.Recipient[1].Name = "cdsj_qwwxmb@sina.com"// Nombre del destinatario del correo

//Especifique el tipo de destinatario como mailTo!

mmsg.Recipient[1].Dirección = 'SMTP:'+" cdsj_qwwxmb@sina.com"//yxbyxb_wj@163.com"

mmsg.Recipient[1]. RecipientType=mailTo!notetext = "Esta es una prueba de correo" //w_mai1.mle_1.text

////mmsg.NoteText = mle_2.text // Texto de correo electrónico

/ Enviar correo

mreturn = mses.mailsend(mmsg)

if mreturn <> mailreturnsuccess entonces

messagebox("Error", "El mensaje no fue enviado , ¡háznoslo saber de otra manera! ~n "+"XXXX@163.com")

Return

else

messagebox("Error", "¡El correo electrónico se ha enviado correctamente, lo solucionaremos lo antes posible!")

end if

//exit login

mses. maillogoff()

//cancelar sesión de correo electrónico

destruir mses