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

admin

Technique  
0 h0 J& n4 C/ W5 z+ i( F/ {( kUse the CCO.Email object to send email messages.
C#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
email.From = fromEmail;
' J1 I* F9 U) C# a1 u: k' Eemail.To = toEmail;
email.Subject = subject;
email.Body = body;
$ t" Q' G& o& I. N; D  A/ t" SCCO.Email.setup_smtpmail_server_and_send(email);

) U& H+ g0 w5 R5 Y// Alternatively use the SendEmailToIdentity
$ y0 T! Z6 s' U# O# K3 w1 `- z' W// The first argument is the Identity name to send the email message.
& l- \; o# B; |+ V// The second argument is the subject text.
5 b3 N! P4 w- h0 }2 E" ?// The third argument is the email body text.
// The last argument is a user login name as the sender and
8 l. m2 E# a6 z: Q8 r# d& f//   if blank will use the logged in user name and
! L/ f- ~  v3 f( J. d, U, v. u2 X( N//   that User Item must have an email address as well.
1 ?, T$ P! b, jCCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
return this.newInnovator().newResult("ok");
  VB.Net  
* a- m  d9 f2 E9 D) A* b! SDim email = New System.Web.Mail.MailMessage()
email.From = fromEmail
email.To = toEmail
+ _( |+ i' U1 W; @) E# S  |email.Subject = subject
. t0 v1 D; m/ d3 E% a+ Bemail.Body = body
CCO.Email.setup_smtpmail_server_and_send(email)
* E5 d6 \- v# ]8 }2 |, y
9 m+ W5 T* r- H' Alternatively use the SendEmailToIdentity
' The first argument Is the Identity name To send the email message.
' The second argument Is the subject text.
. A& N2 h8 i# @1 F! q' The third argument Is the email body text.
' The last argument Is a user login name As the sender And
/ d' w' R) k/ l$ O. O'   If blank will use the logged In user name And
$ |. C- t* `% [; Z'   that User Item must have an email address As well.
CCO.Email.SendEmailToIdentity(identity,subject,body,user)