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

admin

Technique  
Use the CCO.Email object to send email messages.
, z8 `: c" K' @* V  H+ Y1 AC#  
+ d: |/ J2 m$ I; j$ lSystem.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
) }: q* A+ H3 `4 C( x5 Vemail.From = fromEmail;
email.To = toEmail;
4 X) r4 e% l# q1 G; }: |email.Subject = subject;
email.Body = body;
: F! z  K% ]1 d8 ]5 Q- b0 ^CCO.Email.setup_smtpmail_server_and_send(email);

3 v( A8 y' L. J2 t, D5 U6 a  _// Alternatively use the SendEmailToIdentity
$ E, z; q- v8 k' X: \' T9 K// The first argument is the Identity name to send the email message.
// The second argument is the subject text.
1 T1 z: q  S/ c5 L7 C+ x// The third argument is the email body text.
2 Y3 h" B5 Z3 @) J1 T- m- a+ ^# B+ N// The last argument is a user login name as the sender and
//   if blank will use the logged in user name and
: f0 \$ ?% s: i" f2 ~. Y7 X# [0 \7 Y//   that User Item must have an email address as well.
CCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
9 l; E( x- e2 G' ?7 F1 O6 |return this.newInnovator().newResult("ok");
# ?9 P4 i$ M, I  VB.Net  
Dim email = New System.Web.Mail.MailMessage()
' O4 F( ~) n4 d, X4 cemail.From = fromEmail
email.To = toEmail
# @, V8 ~  q# y! {5 @7 bemail.Subject = subject
email.Body = body
CCO.Email.setup_smtpmail_server_and_send(email)
% M$ n9 h4 F& a2 j$ C3 Z
' Alternatively use the SendEmailToIdentity
, |$ [: R3 y/ o' The first argument Is the Identity name To send the email message.
) R/ T  `" c9 T4 L+ x1 d; j- N4 ~' The second argument Is the subject text.
+ V1 b' ^) L6 X, i) A' The third argument Is the email body text.
$ @7 I6 X& h+ N' The last argument Is a user login name As the sender And
4 c6 ?0 U9 \; A' T'   If blank will use the logged In user name And
'   that User Item must have an email address As well.
CCO.Email.SendEmailToIdentity(identity,subject,body,user)

" ]. I/ \$ V$ s/ L