Correo

Para q el siguiente codigo funcione debes tener configurado en tu computadora un perfil de correo, es decir, si tienes configurado el outlook express, el outolook de office o cualquier otro cliente de correo el codigo debe funcionar..
Los perfiles de correo se configuran en 'controlPanel' icono 'mail' boton 'e-mail Accounts'
//Codigo
MailSession mSes
MailReturnCode mRet
MailMessage mMsg
// Create a mail session
mSes = create mailSession
// Log on to the session
mRet = mSes.mailLogon(mailNewSession!)
IF mRet <> mailReturnSuccess! THEN
MessageBox("Mail", 'Logon failed.')
RETURN
END IF
// Populate the mailMessage structure
mMsg.Subject = 'Titulo del correo'
mMsg.NoteText = 'Texto del correo'
mMsg.Recipient[1].name = '[email protected]'
mMsg.Recipient[2].name = '[email protected]'
// Send the mail
mRet = mSes.mailSend(mMsg)
IF mRet <> mailReturnSuccess! THEN
MessageBox("Mail Send", 'Mail not sent')
RETURN
END IF
MSes. MailLogoff()
DESTROY mSes
//Suerte!!