메일 메시지의 본문 텍스트를 설정합니다.
이 메소드는 기존 본문 텍스트를 모두 사용자가 지정한 문자열로 바꿉니다. SetBody 또는 MoreBody 메소드에 대한 이전 호출로 본문 텍스트를 추가한 경우 해당 텍스트는 손실됩니다.
이 메소드는 텍스트를 추가할 때 EOL(end-of-line) 문자 또는 기타 서식 문자를 추가하지 않습니다. bodyText 매개변수에 전달하는 문자열에 이러한 문자를 직접 추가해야 합니다.
VBScript
MailMsg.SetBody bodyText
Perl
$MailMsg->SetBody(bodyText);
VBScript
Dim OleMailMsg
' Session and logon needed if GetUserEmail is used. For example,
' Dim sessionObj
' Set sessionObj = GetSession
' sessionObj.UserLogon loginname, password, dbName, AD_PRIVATE_SESSION, ""
Set OleMailMsg = CreateObject("PAINET.MAILMSG")
msg_from = "admin@example.com"
OleMailMsg.SetFrom(msg_from)
msg_to = "admin@example.com"
OleMailMsg.AddTo(msg_to)
' You must log in to a database session if GetUserEmail is used.
msg_cc = "user_email_address"
' Or this: msg_cc = sessionObj.GetUserEmail
OleMailMsg.AddCc(msg_cc)
msg_subject = "Hello"
OleMailMsg.SetSubject(msg_subject)
msg_body = "This message brought to you from cqole!\n"
OleMailMsg.SetBody(msg_body)
OleMailMsg.Deliver
Perl
use CQPerlExt;
# Session and logon needed if GetUserEmail is used. For example,
# my $sessionObj = CQSession::Build();
# $sessionObj->UserLogon( $loginname, $password, $dbName, "" );
my $mailmsg = CQMailMsg::Build();
# there is currently no SetFrom method for CQPerl
$msg_to = 'admin@us.ibm.com';
$mailmsg->AddTo($msg_to);
# You must log in to a database session if GetUserEmail is used.
$msg_cc = "user_email_address";
# Or this: $msg_cc = $sessionObj->GetUserEmail();
$mailmsg->AddCc($msg_cc);
$msg_subject = "Hello";
$mailmsg->SetSubject($msg_subject);
$msg_body = "This message brought to you from cqperl!\n";
$mailmsg->SetBody($msg_body);
$mailmsg->Deliver();
CQMailMsg::Unbuild($mailmsg);
# CQSession::Unbuild($sessionObj);