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

admin

Technique  
Use the CCO.Email object to send email messages.
& F1 s2 f1 G8 E! e/ L3 d) P, ~( xC#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
email.From = fromEmail;
email.To = toEmail;
7 a+ p, d: E2 V% Z3 t$ z0 }email.Subject = subject;
email.Body = body;
+ C- t" ~  L: n. n/ ^  uCCO.Email.setup_smtpmail_server_and_send(email);
" a( k$ S2 M" q) V
// Alternatively use the SendEmailToIdentity
. d* z: o9 t- \// 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
0 e! q2 S' u; G//   if blank will use the logged in user name and
//   that User Item must have an email address as well.
' N1 U; l' P' a3 a! R. C# U9 \CCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
return this.newInnovator().newResult("ok");
5 _( a3 ?7 B7 z+ z- C" U& ~% M' u  VB.Net  
0 R+ N. I8 B) [Dim email = New System.Web.Mail.MailMessage()
email.From = fromEmail
email.To = toEmail
+ s& u9 H5 l* Temail.Subject = subject
email.Body = body
CCO.Email.setup_smtpmail_server_and_send(email)

' Alternatively use the SendEmailToIdentity
' The first argument Is the Identity name To send the email message.
' The second argument Is the subject text.
& f, W7 P+ V* U( r' The third argument Is the email body text.
' The last argument Is a user login name As the sender And
$ F/ J7 l+ M1 f0 ~- U'   If blank will use the logged In user name And
5 F' @! H, l8 |) U  _'   that User Item must have an email address As well.
6 W5 v( V3 ], v0 v  }0 _7 [# S- HCCO.Email.SendEmailToIdentity(identity,subject,body,user)
3 n% V+ F7 _5 G! o* t, v
1 x, H/ Y3 M/ s. D( R9 S0 X7 `. _