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

admin

Technique  
8 h' ~% z% X* Z8 s3 I# MUse the CCO.Email object to send email messages.
C#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
) x$ W" c+ D% w- o& t! _" k: zemail.From = fromEmail;
email.To = toEmail;
email.Subject = subject;
email.Body = body;
CCO.Email.setup_smtpmail_server_and_send(email);
# U; |. o. K) p  H4 {' ^1 `% t
- U' M; t4 Z, {. d// Alternatively use the SendEmailToIdentity
// The first argument is the Identity name to send the email message.
// The second argument is the subject text.
! C( ?9 h* `8 v0 M2 q( z$ w// The third argument is the email body text.
& B' H, m; Q% y  b// The last argument is a user login name as the sender and
6 H7 {; {. f6 @' [//   if blank will use the logged in user name and
//   that User Item must have an email address as well.
9 U  \& Z9 f4 d% ACCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
return this.newInnovator().newResult("ok");
% O9 ]# ^7 y* J4 u# C, y, A2 L  VB.Net  
& \8 E4 p9 G( i& q% BDim email = New System.Web.Mail.MailMessage()
1 }- `1 w) ^# @, j: wemail.From = fromEmail
email.To = toEmail
email.Subject = subject
7 d: O& K9 L( g6 C" l4 J: Iemail.Body = body
CCO.Email.setup_smtpmail_server_and_send(email)

) ]* \7 a9 T$ q, g: V' Alternatively use the SendEmailToIdentity
' The first argument Is the Identity name To send the email message.
' The second argument Is the subject text.
& O2 B3 c0 h& ?0 V6 u' The third argument Is the email body text.
+ J- c) w1 ]) o; i1 t' The last argument Is a user login name As the sender And
+ F$ b0 E- t9 j! }0 \8 H( W" M'   If blank will use the logged In user name And
" ?& U# D! ]  c* x- {* D8 `, D) w'   that User Item must have an email address As well.
CCO.Email.SendEmailToIdentity(identity,subject,body,user)
, e( ~4 x" A' m0 y- j
2 |1 a; w2 X5 n" y8 j% P" O