A
Отдельный лес рядом, и 2010 в нем
отдельная чанга и ад чисто для пересылки?
Size: a a a
2020 November 02
AM
Так-то я могу и существующий MDaemon под это держать. Хотелось без костылей.
AM
Поговорю с создателями робота. Упрутся - напишу костыль для EWS, это будет наименьшим костылём из всех. Лучше скрипт на поше, дёргающий EWS раз в пять минут, чем отдельный лес иметь. Минимум две виртуалки, патчить его, и прочее.
EV
Не имею права, он End of Support с 13 октября.
Ерунда
AM
Мне просто не разрешат, считаю я это ерундой или нет.
A
вот ведь нацики
MS
ДС
В Танзании не любят русских?
MS
Дмитрий Стародубцев
В Танзании не любят русских?
Уже нет:)
2020 November 03
е
Уже нет:)
Что эти ниггеры себе позволяют?
MS
Что эти ниггеры себе позволяют?
Совсем охерели
AM
Сам спросил - сам отвечаю.
Успешно опробовал Quick and Dirty РоС скрипта, дёргающего EWS и редиректящего письмо из Inbox по новому адресу с сохранением всего: форматирования, аттачментов и так далее.
Ключевой фактор - не создавать новое письмо и копировать в него аттачменты, а просто подменить соответствующие поля в теле письма. Вот так примерно:
$mailProps = New-Object Microsoft.Exchange.WebServices.Data.PropertySet([Microsoft.Exchange.WebServices.Data.EmailMessageSchema]::MimeContent)
$OldMsg=[Microsoft.Exchange.WebServices.Data.Item]::Bind($exchService,$id,$MailProps)
$NewMsg=New-Object Microsoft.Exchange.WebServices.Data.EmailMessage($exchService)
$mc=$OldMsg.MimeContent
$s=$mc.ToString()
$s=$s.Replace("To: Bouncer <bouncer[at]contoso>","To: Tailspin <destination[at]tailspintoys>").replace("From: Robot <robot[at]contoso>","From: Bouncer <bouncer[at]contoso>")
$mc.Content=[System.Text.Encoding]::Utf8.GetBytes($s)
$NewMsg.MimeContent=$mc
$NewMsg.SendAndSaveCopy([Microsoft.Exchange.WebServices.Data.WellKnownFolderName]::SentItems)
Работает.
Успешно опробовал Quick and Dirty РоС скрипта, дёргающего EWS и редиректящего письмо из Inbox по новому адресу с сохранением всего: форматирования, аттачментов и так далее.
Ключевой фактор - не создавать новое письмо и копировать в него аттачменты, а просто подменить соответствующие поля в теле письма. Вот так примерно:
$mailProps = New-Object Microsoft.Exchange.WebServices.Data.PropertySet([Microsoft.Exchange.WebServices.Data.EmailMessageSchema]::MimeContent)
$OldMsg=[Microsoft.Exchange.WebServices.Data.Item]::Bind($exchService,$id,$MailProps)
$NewMsg=New-Object Microsoft.Exchange.WebServices.Data.EmailMessage($exchService)
$mc=$OldMsg.MimeContent
$s=$mc.ToString()
$s=$s.Replace("To: Bouncer <bouncer[at]contoso>","To: Tailspin <destination[at]tailspintoys>").replace("From: Robot <robot[at]contoso>","From: Bouncer <bouncer[at]contoso>")
$mc.Content=[System.Text.Encoding]::Utf8.GetBytes($s)
$NewMsg.MimeContent=$mc
$NewMsg.SendAndSaveCopy([Microsoft.Exchange.WebServices.Data.WellKnownFolderName]::SentItems)
Работает.
е
Мило. Спасибо что поделился
АФ
Сам спросил - сам отвечаю.
Успешно опробовал Quick and Dirty РоС скрипта, дёргающего EWS и редиректящего письмо из Inbox по новому адресу с сохранением всего: форматирования, аттачментов и так далее.
Ключевой фактор - не создавать новое письмо и копировать в него аттачменты, а просто подменить соответствующие поля в теле письма. Вот так примерно:
$mailProps = New-Object Microsoft.Exchange.WebServices.Data.PropertySet([Microsoft.Exchange.WebServices.Data.EmailMessageSchema]::MimeContent)
$OldMsg=[Microsoft.Exchange.WebServices.Data.Item]::Bind($exchService,$id,$MailProps)
$NewMsg=New-Object Microsoft.Exchange.WebServices.Data.EmailMessage($exchService)
$mc=$OldMsg.MimeContent
$s=$mc.ToString()
$s=$s.Replace("To: Bouncer <bouncer[at]contoso>","To: Tailspin <destination[at]tailspintoys>").replace("From: Robot <robot[at]contoso>","From: Bouncer <bouncer[at]contoso>")
$mc.Content=[System.Text.Encoding]::Utf8.GetBytes($s)
$NewMsg.MimeContent=$mc
$NewMsg.SendAndSaveCopy([Microsoft.Exchange.WebServices.Data.WellKnownFolderName]::SentItems)
Работает.
Успешно опробовал Quick and Dirty РоС скрипта, дёргающего EWS и редиректящего письмо из Inbox по новому адресу с сохранением всего: форматирования, аттачментов и так далее.
Ключевой фактор - не создавать новое письмо и копировать в него аттачменты, а просто подменить соответствующие поля в теле письма. Вот так примерно:
$mailProps = New-Object Microsoft.Exchange.WebServices.Data.PropertySet([Microsoft.Exchange.WebServices.Data.EmailMessageSchema]::MimeContent)
$OldMsg=[Microsoft.Exchange.WebServices.Data.Item]::Bind($exchService,$id,$MailProps)
$NewMsg=New-Object Microsoft.Exchange.WebServices.Data.EmailMessage($exchService)
$mc=$OldMsg.MimeContent
$s=$mc.ToString()
$s=$s.Replace("To: Bouncer <bouncer[at]contoso>","To: Tailspin <destination[at]tailspintoys>").replace("From: Robot <robot[at]contoso>","From: Bouncer <bouncer[at]contoso>")
$mc.Content=[System.Text.Encoding]::Utf8.GetBytes($s)
$NewMsg.MimeContent=$mc
$NewMsg.SendAndSaveCopy([Microsoft.Exchange.WebServices.Data.WellKnownFolderName]::SentItems)
Работает.
👍
D
подскажите, как из exchange 2010 с помощью powershell по ящикам сделать табличку с датой самого старого письма ?
EV
подскажите, как из exchange 2010 с помощью powershell по ящикам сделать табличку с датой самого старого письма ?
EWS.
EV
И полностью задачу опишите.
D
И полностью задачу опишите.
две задачи
1) размер ящиков (решил)
2) дата самого старого письма в каждом ящике - не знаю, как подступиться
1) размер ящиков (решил)
2) дата самого старого письма в каждом ящике - не знаю, как подступиться
EV
2) зачем вам это???