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

admin

Technique  
Use the CCO.Email object to send email messages.
C#  
" b% X1 c) {) z% y$ ~& ^+ Y: u- v& `System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
email.From = fromEmail;
email.To = toEmail;
. A0 k5 M. Y$ S1 L$ m' X' R; Vemail.Subject = subject;
. I# c" z1 B+ W- ]% Cemail.Body = body;
CCO.Email.setup_smtpmail_server_and_send(email);

; H7 |1 M! @' N6 q* w/ v// Alternatively use the SendEmailToIdentity
, l6 P% c# l9 f! f9 n// The first argument is the Identity name to send the email message.
; U7 b+ B- b% R1 U1 B5 D& O% Z2 G! J// The second argument is the subject text.
4 ~0 \! r$ g/ t, b4 j/ Z. a8 K// 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.
, ?% q& ]4 k" k* K: t5 jCCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
' L% t- ^4 Z' @8 ^( |5 qreturn this.newInnovator().newResult("ok");
  VB.Net  
Dim email = New System.Web.Mail.MailMessage()
email.From = fromEmail
email.To = toEmail
email.Subject = subject
email.Body = body
% x: U7 q" W% R& OCCO.Email.setup_smtpmail_server_and_send(email)
) r# k" \: V+ T1 d9 t8 O7 P; H
+ I' V5 Z* V& |; T1 ^# P' Alternatively use the SendEmailToIdentity
% Y  k  ?9 I* U7 P9 `' The first argument Is the Identity name To send the email message.
' The second argument Is the subject text.
3 I9 b# T# y' n: ^! W6 |3 Q4 _' The third argument Is the email body text.
' The last argument Is a user login name As the sender And
& k3 i3 n6 M  U1 \. C" r$ Z'   If blank will use the logged In user name And
2 a. Y' Z2 k5 b3 w0 b'   that User Item must have an email address As well.
9 v3 N% ?; C+ ~, r/ oCCO.Email.SendEmailToIdentity(identity,subject,body,user)
( \0 K% z, D8 _/ L2 O& c# D