Como no amigo... esta es un procedimiento que puedes crear en tu kbase y que puedes usar para enviar los mails que necesites:
En rules:
Parm( &Serv,&RNom,&RMail,&To,&CC,&CO,&Asunto,&TexMail,&Attach );
y en eventos:
// valores por defecto
// &Serv = '
[email protected]' C60
// &CC = '' con copia a ..... ,C60
// &CO = '' con copia oculta a (varios separados por coma) , C60
// &Attach = '' poner path y nombre del archivo (varios separados por coma) ,C60
// &To = &SopMail C60
// &Asunto = 'Soporte a Usuarios de BaseOnWeb' C60
// &TexMail = &TexBie L10Kb
// Call(PSendMail,&Serv,&RNom,&RMail,&To,&CC,&CO,&Asunto,&TexMail,&Attach) completo
// Call(PSendMail,'','','',&To,'','',&Asunto,&TexMail,'') minimo
&smtp.Host = &Serv
&smtp.Sender.Address = &RMail
&smtp.Sender.Name = &RNom
&smtp.ErrDisplay = 0
&smtp.Login()
&Mail.To.New(&To, &To)
&Mail.Subject = &Asunto
&Mail.Text = &TexMail
&smtp.Send(&Mail)
&smtp.Logout()
Espero te haya quedado claro: las variables mas importantes son &mail que es una variable de tipo mailmessage, y &smtp que es de tipo SMTPSession. Mas explicito no puedo ser....
Saludos!!! PF
