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

admin

Technique  
/ y% a3 u4 J. V3 Y% ?Use the CCO.Email object to send email messages.
C#  
System.Web.Mail.MailMessage email = new System.Web.Mail.MailMessage();
email.From = fromEmail;
4 Z5 N  w) J. E" z1 N2 I4 eemail.To = toEmail;
email.Subject = subject;
: A8 h% \9 p6 ^% L% xemail.Body = body;
CCO.Email.setup_smtpmail_server_and_send(email);
5 B2 s& a) y3 F! w
2 }6 J# a- B/ ]8 f& X$ ]// Alternatively use the SendEmailToIdentity
9 n8 q, ]; ~' e; A: E1 l1 v// The first argument is the Identity name to send the email message.
* V1 y% l+ p6 b1 n0 {+ d// The second argument is the subject text.
' k1 ]' V0 [, q// The third argument is the email body text.
. w# N) V0 @5 W4 W% S" |// The last argument is a user login name as the sender and
//   if blank will use the logged in user name and
* G' Q0 F! J: I# Q8 D. P//   that User Item must have an email address as well.
, q( H3 y, C& @( T" f/ jCCO.Email.SendEmailToIdentity(ref identity, ref subject, ref body, ref user);
return this.newInnovator().newResult("ok");
8 u) t" e$ m8 Y! u9 C; L  VB.Net  
! ]6 z# w( J0 ?5 w9 a; F" WDim email = New System.Web.Mail.MailMessage()
& ^9 i! V$ F$ @4 Xemail.From = fromEmail
3 D* ~, r' ?( H) _2 A6 ]+ W4 ]email.To = toEmail
1 T2 \; Z& r- B. uemail.Subject = subject
email.Body = body
( S% ?/ W% K3 s9 ]CCO.Email.setup_smtpmail_server_and_send(email)

' Alternatively use the SendEmailToIdentity
9 Y) |( Q0 _2 u6 R1 A9 Z% c' 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.
5 T$ d( w4 I3 ^, K7 F, A' The last argument Is a user login name As the sender And
, J! e& o% p' F% f'   If blank will use the logged In user name And
'   that User Item must have an email address As well.
1 Q- {6 I- E4 a) o0 \* OCCO.Email.SendEmailToIdentity(identity,subject,body,user)
7 d% c$ X; m+ u