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

admin

Technique  
0 w; G7 N0 _: V# {: _0 WUse the CCO.Email object to send email messages.
4 Y: s3 u' N3 C: LC#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
8 l7 Q, D. m; K8 E- I. R  Y+ Q: ~email.From = fromEmail;
7 v" I5 a% g( oemail.To = toEmail;
email.Subject = subject;
$ J8 ^# a% u7 o1 M$ z) N' bemail.Body = body;
; v, C7 c3 r8 E3 g4 D9 a, tCCO.Email.setup_smtpmail_server_and_send(email);
5 }5 `7 e( C: k& k
4 l& C# c/ {. z# M// Alternatively use the SendEmailToIdentity
// The first argument is the Identity name to send the email message.
// 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
1 n  i# `) v; Y' p//   if blank will use the logged in user name and
4 e) ]- ]: ^+ e, K# |//   that User Item must have an email address as well.
$ |  f( O, p6 U# ZCCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
- p* ]% ~* q; ?return this.newInnovator().newResult("ok");
  VB.Net  
7 Q0 C5 a: C0 @. b$ n) qDim email = New System.Web.Mail.MailMessage()
" H: R1 a2 m# d  O. N, ?% n* Vemail.From = fromEmail
6 w% H# K  E# M8 f; ~email.To = toEmail
email.Subject = subject
email.Body = body
8 _$ s9 y5 _0 q! R& u/ U, iCCO.Email.setup_smtpmail_server_and_send(email)
+ o8 s- H% s; |6 }% P
' Alternatively use the SendEmailToIdentity
, w9 u  u% h( f3 r1 ~, s' X2 ]' The first argument Is the Identity name To send the email message.
+ g! P6 i$ m' L1 f' The second argument Is the subject text.
' The third argument Is the email body text.
5 I' p: B+ m8 A6 i' The last argument Is a user login name As the sender And
'   If blank will use the logged In user name And
3 d: j' [2 q& o- c, y9 m6 g& S0 o- A1 Y'   that User Item must have an email address As well.
& D9 x# M$ C5 O5 hCCO.Email.SendEmailToIdentity(identity,subject,body,user)

% J. z5 A, z" p* k. A% k7 N+ Z4 X8 w