Hi Martin,
Martin Edenhofer wrote:
Hi Alex,
no, there is no existing script.
A question, in what case do you use this?
Well, we need this kind of feature for bouncing mail to specific
mail-list (before bounce, mail must get ticket number).
btw, my script was not working because there were new attributes added
to ArticleSend (which are required and that was not mentioned in
descripton ;-).
Are those required: Charset => 'ISO-8859-2', Type => 'text/plain' ?
=item ArticleSend()
send article via email and create article with attachments
my $ArticleID = $TicketObject->ArticleSend(
TicketID => 123,
ArticleType => 'note-internal' #
email-external|email-internal|phone|fax|...
SenderType => 'agent', # agent|system|customer
From => 'Some Agent ', # not required but useful
To => 'Some Customer A ', # not required
but useful
Cc => 'Some Customer B ', # not required
but useful
ReplyTo => 'Some Customer B ', # not required
Subject => 'some short description', # required
Body => 'the message text', # required
MessageID => '', # not required but useful
Charset => 'ISO-8859-15'
Type => 'text/plain',
Loop => 0, # 1|0 used for bulk emails
Attachment => [
{
Content => $Content,
ContentType => $ContentType,
Filename => 'lala.txt',
},
{
Content => $Content,
ContentType => $ContentType,
Filename => 'lala1.txt',
},
],
Sign => {
Type => 'PGP',
SubType => 'Inline|Detached',
Key => '81877F5E',
Type => 'SMIME',
Key => '3b630c80',
},
Crypt => {
Type => 'PGP',
SubType => 'Inline|Detached',
Key => '81877F5E',
Type => 'SMIME',
Key => '3b630c80',
},
HistoryType => 'OwnerUpdate', #
Move|AddNote|PriorityUpdate|WebRequestCustomer|...
HistoryComment => 'Some free text!',
NoAgentNotify => 0, # if you don't want to send agent
notifications
UserID => 123,
);
=cut
Best regards,
--alexm