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

admin

Technique  
Use the CCO.Email object to send email messages.
% r3 E- z! r) q& S7 a6 k3 `5 oC#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
/ t7 Q0 h. P$ Q( U$ P; W' kemail.From = fromEmail;
; p1 L7 A& |6 {( Y7 B$ X! lemail.To = toEmail;
email.Subject = subject;
7 \" ]1 }+ t" z- N; V6 }email.Body = body;
& }& T! K& v1 J* uCCO.Email.setup_smtpmail_server_and_send(email);
+ `) z, ]3 ~, d7 w" i
// Alternatively use the SendEmailToIdentity
// The first argument is the Identity name to send the email message.
// The second argument is the subject text.
/ \/ D% S* |$ A1 S, u// The third argument is the email body text.
// The last argument is a user login name as the sender and
//   if blank will use the logged in user name and
: Q0 R3 F: l9 P3 \' [5 {//   that User Item must have an email address as well.
* i4 C" V2 |& z6 [! ]CCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
return this.newInnovator().newResult("ok");
$ t/ C1 L1 L8 v  e  VB.Net  
  C1 q4 ]7 i2 [, \' @2 Q7 TDim email = New System.Web.Mail.MailMessage()
+ d( C5 X/ ?4 v6 a+ m& z/ [email.From = fromEmail
email.To = toEmail
email.Subject = subject
/ C0 A! }0 O3 |8 Q$ ^. p7 n! T+ Oemail.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.
' The third argument Is the email body text.
0 K+ I% V, B  [' The last argument Is a user login name As the sender And
'   If blank will use the logged In user name And
'   that User Item must have an email address As well.
CCO.Email.SendEmailToIdentity(identity,subject,body,user)