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

admin

Technique  
Use the CCO.Email object to send email messages.
, i. i+ h1 f5 NC#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
% \4 Y+ [  E" [- w3 E: xemail.From = fromEmail;
: P$ @1 ^- x* Xemail.To = toEmail;
email.Subject = subject;
email.Body = body;
9 m- B" i. w2 `  l; dCCO.Email.setup_smtpmail_server_and_send(email);
! d& N! d6 J8 p
// Alternatively use the SendEmailToIdentity
// The first argument is the Identity name to send the email message.
// The second argument is the subject text.
* c& Z& Y3 G3 |6 J. T) H// 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
//   that User Item must have an email address as well.
CCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
return this.newInnovator().newResult("ok");
  VB.Net  
1 j  X- m( M# K5 m1 Z! S4 F" [Dim email = New System.Web.Mail.MailMessage()
email.From = fromEmail
email.To = toEmail
: V. Q) J+ q( b1 ?  S8 g* W) Cemail.Subject = subject
" ^9 D. U0 [) \0 q. w  b4 ]7 n/ memail.Body = body
5 T% w% S' G: @$ o7 d- TCCO.Email.setup_smtpmail_server_and_send(email)
. J. I/ _5 N: H9 c
' Alternatively use the SendEmailToIdentity
' The first argument Is the Identity name To send the email message.
' The second argument Is the subject text.
- t8 \9 V( b! S" n6 V; ?5 g' 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
, p4 D6 {$ c4 i'   that User Item must have an email address As well.
' T; J9 h: x! H" mCCO.Email.SendEmailToIdentity(identity,subject,body,user)
' S# K7 U1 B7 ^* S* E
# V; W* i$ V  U, e. c- b. {