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

admin

Technique  
Use the CCO.Email object to send email messages.
C#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
- O9 W" i! B1 U6 Q3 `email.From = fromEmail;
+ K" x5 [1 c0 v7 m. b8 Yemail.To = toEmail;
. g8 z( {! g- o$ N4 demail.Subject = subject;
email.Body = body;
% F7 b1 n8 t% _# k4 P, B$ v5 uCCO.Email.setup_smtpmail_server_and_send(email);

3 Q, p* m) i1 v// Alternatively use the SendEmailToIdentity
// The first argument is the Identity name to send the email message.
  f3 _2 s  i- k& j3 v  B// The second argument is the subject text.
/ P' K7 C  T$ i! A// 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
0 O0 {( s+ i' B9 g' U//   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  
' _$ x9 k0 z" n! C1 p9 ~Dim email = New System.Web.Mail.MailMessage()
email.From = fromEmail
email.To = toEmail
. ^" H+ E. ~5 R# X) zemail.Subject = subject
, R0 a0 ]0 p( r0 u/ G5 Hemail.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.
- T0 q" |4 N0 h: A: f2 U4 w1 P1 u' The third argument Is the email body text.
' The last argument Is a user login name As the sender And
4 T; b7 v" Q( _'   If blank will use the logged In user name And
'   that User Item must have an email address As well.
3 X9 ?1 p- Q# e% l# FCCO.Email.SendEmailToIdentity(identity,subject,body,user)
: g& V/ y1 b. L! M
5 w6 |3 D7 K8 `* o; {6 m