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

admin

Technique  
2 P; I! {8 v7 M2 q; T$ l8 mUse the CCO.Email object to send email messages.
; |8 w- x" {+ k7 TC#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
email.From = fromEmail;
email.To = toEmail;
email.Subject = subject;
email.Body = body;
9 u1 _* P& \% U/ E9 S- Y4 PCCO.Email.setup_smtpmail_server_and_send(email);

0 `( R$ S5 e9 m// Alternatively use the SendEmailToIdentity
$ t3 V. Z" k# q4 {0 ]  B// The first argument is the Identity name to send the email message.
' q5 ^: b5 J) [9 z" |- P( I; _// The second argument is the subject text.
// The third argument is the email body text.
  p  ^; l$ z; I- i5 O0 i9 T. y// The last argument is a user login name as the sender and
1 N9 h" d& ~: W, u: _//   if blank will use the logged in user name and
//   that User Item must have an email address as well.
0 ?0 J# g) N, P: @* A6 }2 a, l3 ?CCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
return this.newInnovator().newResult("ok");
  VB.Net  
Dim email = New System.Web.Mail.MailMessage()
' @2 W5 w$ p6 Z8 l  Memail.From = fromEmail
email.To = toEmail
email.Subject = subject
email.Body = body
CCO.Email.setup_smtpmail_server_and_send(email)
8 o1 `$ e, ~3 N+ p
' Alternatively use the SendEmailToIdentity
" n, e( R5 }" }* K' The first argument Is the Identity name To send the email message.
: ~4 k0 S$ u: n1 ~" @' The second argument Is the subject text.
3 m3 Y. R/ X2 s5 E8 q- y' The third argument Is the email body text.
; X0 u% ?' s$ F" N7 v' The last argument Is a user login name As the sender And
+ V5 v9 t  O/ [8 M$ g9 f; r2 ~$ a'   If blank will use the logged In user name And
7 t$ v) I* j8 f* r'   that User Item must have an email address As well.
CCO.Email.SendEmailToIdentity(identity,subject,body,user)
: [  I( u4 m2 Z% P4 e$ R* i9 @