【Aras二次开发源码】服务器端发送电子邮件方法

admin

Technique  
: u. `  o+ G! L2 E# ^! oUse the CCO.Email object to send email messages.
C#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
email.From = fromEmail;
email.To = toEmail;
email.Subject = subject;
email.Body = body;
; @$ ^& f$ _$ Y, u4 k5 uCCO.Email.setup_smtpmail_server_and_send(email);
  y. N5 ?( r% G6 @
% G! [8 i/ T1 c// Alternatively use the SendEmailToIdentity
& V' [$ F2 N/ G/ x6 P  `! Y// The first argument is the Identity name to send the email message.
- S! `( q) w  X. s' ~& d( G// The second argument is the subject text.
+ L2 U$ @6 S4 j2 i9 z// The third argument is the email body text.
! U. B1 V( M. e: o// The last argument is a user login name as the sender and
//   if blank will use the logged in user name and
//   that User Item must have an email address as well.
CCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
return this.newInnovator().newResult("ok");
4 ~% x7 n5 {* l/ {8 k9 z  VB.Net  
' t6 u5 X& b! Z3 Z. s. [Dim email = New System.Web.Mail.MailMessage()
email.From = fromEmail
email.To = toEmail
email.Subject = subject
: V8 L' x( _  e; V, d- iemail.Body = body
CCO.Email.setup_smtpmail_server_and_send(email)

' Alternatively use the SendEmailToIdentity
! [" b! s0 ^; y' The first argument Is the Identity name To send the email message.
4 v" m$ H* P0 y$ C! ?4 f) g. U' The second argument Is the subject text.
' The third argument Is the email body text.
' The last argument Is a user login name As the sender And
" w% {, u1 K1 o+ \7 |2 T% U'   If blank will use the logged In user name And
$ _/ T3 l; b4 Y/ u'   that User Item must have an email address As well.
CCO.Email.SendEmailToIdentity(identity,subject,body,user)