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

admin

Technique  
Use the CCO.Email object to send email messages.
C#  
' u3 n3 m- o% M1 E) d/ j6 v4 xSystem.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
% ]' f$ ]8 |6 a; }email.From = fromEmail;
email.To = toEmail;
email.Subject = subject;
8 u" A7 f# G! t5 E  Z: v" {email.Body = body;
* W# B4 t/ P% s4 w  cCCO.Email.setup_smtpmail_server_and_send(email);
4 _2 r# {& D0 @0 z/ f) J
// Alternatively use the SendEmailToIdentity
// The first argument is the Identity name to send the email message.
// The second argument is the subject text.
) a, g) F( S# M! w// The third argument is the email body text.
// 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");
  VB.Net  
* M  u/ K( f+ E% }Dim email = New System.Web.Mail.MailMessage()
' t6 J* k6 _7 f+ V5 }$ [email.From = fromEmail
, y) i- U" b5 B; @' Jemail.To = toEmail
email.Subject = subject
0 H3 X# ^" T% ]5 C4 |4 P5 |9 {# Q7 cemail.Body = body
6 P4 i$ M9 Z6 r% w& ~. M3 ECCO.Email.setup_smtpmail_server_and_send(email)
. E. l8 v2 T7 k6 G$ E: |2 o
' Alternatively use the SendEmailToIdentity
# t- \4 F8 v6 @+ o' The first argument Is the Identity name To send the email message.
' The second argument Is the subject text.
4 `2 a; g4 D2 x; Z' The third argument Is the email body text.
8 [& y2 d4 b, |5 a' The last argument Is a user login name As the sender And
5 ?& I' X& |# l; p'   If blank will use the logged In user name And
# v. s% Y; U: `1 ]8 N1 J'   that User Item must have an email address As well.
CCO.Email.SendEmailToIdentity(identity,subject,body,user)

7 k' z% e4 U6 {0 u* ~$ q