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

admin

Technique  
Use the CCO.Email object to send email messages.
C#  
4 L- p9 F. Y' z$ I6 \System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
email.From = fromEmail;
email.To = toEmail;
email.Subject = subject;
email.Body = body;
CCO.Email.setup_smtpmail_server_and_send(email);

// Alternatively use the SendEmailToIdentity
; N$ F: r0 Y" ?% _. f) ^- E// The first argument is the Identity name to send the email message.
// The second argument is the subject text.
# I; o, k# |, O  {/ f  D. p+ O// The third argument is the email body text.
2 o0 \! w( e' @5 w  b( Z- R: Q# @// 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);
. {* E* J6 d7 J3 Lreturn this.newInnovator().newResult("ok");
  VB.Net  
! b( L* B* i1 lDim email = New System.Web.Mail.MailMessage()
email.From = fromEmail
1 d8 K% \9 ~0 Z$ A' h% q: U( pemail.To = toEmail
email.Subject = subject
email.Body = body
% C7 C  |+ K9 ^  C( u3 B' H+ {8 u, vCCO.Email.setup_smtpmail_server_and_send(email)
" f; P9 I: m3 h9 v5 B+ u
$ W- B6 \% B6 m* G+ Y# G% a. h1 u' Alternatively use the SendEmailToIdentity
' The first argument Is the Identity name To send the email message.
9 |+ P( }, S- m* _4 Z' 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
2 _$ s% G* J% p9 w& z'   If blank will use the logged In user name And
5 u: j) p  W1 [0 h'   that User Item must have an email address As well.
CCO.Email.SendEmailToIdentity(identity,subject,body,user)
. u8 K4 ]- [( h) D( ]6 p5 g
  Y2 @" a4 N( j2 E