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

admin

Technique  
Use the CCO.Email object to send email messages.
% G/ o' f# Z* H& e3 R2 R4 `! v* j2 EC#  
  a- Y/ M2 d1 r5 bSystem.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
, L( G- f. }8 Eemail.From = fromEmail;
2 z' Z/ d- N9 x) ~9 Wemail.To = toEmail;
email.Subject = subject;
email.Body = body;
; N8 F8 u2 J! ]; l4 F3 tCCO.Email.setup_smtpmail_server_and_send(email);
5 e; F% y  ~7 ?( F6 T0 h  o
9 ]& d2 m/ \6 O" r// Alternatively use the SendEmailToIdentity
// The first argument is the Identity name to send the email message.
// The second argument is the subject text.
# l" z/ y- s0 ?) X// 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
. Y: p, Q) \) `! K5 K7 F# H//   that User Item must have an email address as well.
CCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
" k9 L9 U6 Q1 A; dreturn this.newInnovator().newResult("ok");
% @( H6 r& F3 W) I  VB.Net  
Dim email = New System.Web.Mail.MailMessage()
0 P/ [! {' x+ t" wemail.From = fromEmail
  _( B) M1 ^. Qemail.To = toEmail
( b1 ?2 h$ p; `) k8 Wemail.Subject = subject
% f* ^, M1 E' Z: E0 Z* B- wemail.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.
' 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)

' T9 X2 r  B& h$ l, ~