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

admin

Technique  
( b4 A" I- H* k( bUse the CCO.Email object to send email messages.
" `' U0 o5 [$ cC#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
; x$ H7 y0 j- K1 K) q0 Y  cemail.From = fromEmail;
email.To = toEmail;
1 e: b7 `- a5 ]; E0 P, Femail.Subject = subject;
: k8 w1 o9 k. H! cemail.Body = body;
; \" p  y# G/ J8 K8 R* Z# cCCO.Email.setup_smtpmail_server_and_send(email);

// Alternatively use the SendEmailToIdentity
) a# s  q9 y2 y// The first argument is the Identity name to send the email message.
// The second argument is the subject text.
/ \4 y4 W/ @* B" A// The third argument is the email body text.
// The last argument is a user login name as the sender and
( c( n9 v* \) q# T$ I2 p//   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");
9 l; S8 \0 Q" P: g: }) c, b  VB.Net  
* N, L8 K3 d. t! h9 YDim email = New System.Web.Mail.MailMessage()
6 O* G7 X: O' ?$ q. _6 O( eemail.From = fromEmail
email.To = toEmail
2 ~  l7 A6 k; S- memail.Subject = subject
email.Body = body
" W! t9 r/ s7 c' w# g* n" o5 LCCO.Email.setup_smtpmail_server_and_send(email)

1 U  t  W) i2 [" `' Alternatively use the SendEmailToIdentity
' S5 }; M0 O# J! `( w2 \' The first argument Is the Identity name To send the email message.
3 Z" W# H3 C' M* n' The second argument Is the subject text.
, V' g# x6 F4 E1 Z) u6 T9 {' The third argument Is the email body text.
& o) O* |8 W( n- `' The last argument Is a user login name As the sender And
# n, b- N" c" {. o) k8 j5 u/ k'   If blank will use the logged In user name And
* e( I( q. q1 a6 v0 X'   that User Item must have an email address As well.
CCO.Email.SendEmailToIdentity(identity,subject,body,user)

" \, y! B/ `. G