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

admin

Technique  
& h' H8 g0 f' T( l, V2 o5 PUse the CCO.Email object to send email messages.
C#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
+ T& O: b# A; `% _# {9 q. Semail.From = fromEmail;
9 S% `2 P4 R  `: m( Femail.To = toEmail;
7 F6 n( {) K' \email.Subject = subject;
email.Body = body;
4 F5 V" o9 ^" T* iCCO.Email.setup_smtpmail_server_and_send(email);

. l% V  M  L$ K. \( A3 D& I4 [// Alternatively use the SendEmailToIdentity
// The first argument is the Identity name to send the email message.
// The second argument is the subject text.
, Q) h: b5 p2 R8 M) V4 M9 \5 g// The third argument is the email body text.
// The last argument is a user login name as the sender and
  m" F/ A7 g, P$ J//   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");
  VB.Net  
Dim email = New System.Web.Mail.MailMessage()
) K$ p" P6 W1 P! q& eemail.From = fromEmail
email.To = toEmail
4 l4 f$ N$ m1 `4 [" q- Jemail.Subject = subject
& l: z6 y! p& _3 |4 h( g- ^email.Body = body
CCO.Email.setup_smtpmail_server_and_send(email)

' a  t! M& s/ Z! q' Alternatively use the SendEmailToIdentity
1 b! Q9 U  o+ i; m: _' The first argument Is the Identity name To send the email message.
' The second argument Is the subject text.
6 D( W5 T" j" \* P2 k' The third argument Is the email body text.
' The last argument Is a user login name As the sender And
6 b5 o! s: T1 X: v'   If blank will use the logged In user name And
  Z# ]" \$ c0 R( t) {, l'   that User Item must have an email address As well.
CCO.Email.SendEmailToIdentity(identity,subject,body,user)

$ y5 x: ~) n( I9 ?( Z0 \