Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » Любой язык - [решено] выташить емайл аддресс из Оутлука и записать в текст файл

Ответить
Настройки темы
Любой язык - [решено] выташить емайл аддресс из Оутлука и записать в текст файл

Пользователь


Сообщения: 138
Благодарности: 7

Профиль | Отправить PM | Цитировать


Изменения
Автор: rufat_4
Дата: 28-08-2014
Доброе время суток!
помогите плз,
нужен скрипт который вытащит существующие емайл адреса из оутлука и запишет в текст файл.
будет CSV который будет лежать на файл сервере и рассшарен , и записование в этот файл нужен в следующем формате:

samaccountname,emailadress1,emailsaddress2
john,donj@example.com,null
johnsmith,jsmit@example.com,johnn@mail.com

и так далее, возможно ли такое? замечу что , на всех клиентский машинах оутлук настроен по POP/SMTP , нужен именно емайл адресса (под котором пользователь аутентифицируются) - а не имя профайла или имя сервера ит.п.

спасибо всем заранее ..

-------
MCP : 70-270 , 70-290 , 70-291, 70-685


Отправлено: 09:47, 28-08-2014

 

Пользователь


Сообщения: 138
Благодарности: 7

Профиль | Отправить PM | Цитировать


сделал следующий скрипт, вдруг кому то понадобиться.


Код: Выделить весь код
$user = Import-Csv \\dc01.domain.lan\migratereport$\emailaddress.txt | where  `
{$_.samaccountname -eq "$env:username"}
if ($user) {break} 
       else  { 
$mail = New-Object -ComObject Outlook.Application
$accounts = $mail.session.accounts | %{Write-Output $_.smtpaddress}
if (($accounts | measure).count -eq '1') {
$env:username+','+$accounts  | Add-Content -Path `
 \\dc01.domain.lan\migratereport$\emailaddress.txt }  
elseif (($accounts | measure).count -eq '2') {
$env:username+','+$accounts[0]+','+$accounts[1] | Add-Content -Path `
\\domain.lan\migratereport$\emailaddress.txt}
else {
$env:username+','+'null' | Add-Content -Path `
 \\dc01.domain.lan\migratereport$\emailaddress.txt}
(Get-Process outlook*).kill()
}

-------
MCP : 70-270 , 70-290 , 70-291, 70-685


Отправлено: 17:06, 29-08-2014 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Скриптовые языки администрирования Windows » Любой язык - [решено] выташить емайл аддресс из Оутлука и записать в текст файл

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
[решено] чем записать разборчивый мелкий текст с экрана (видео)? docentdocent Видео и аудио: обработка и кодирование 13 27-08-2014 21:10
CMD/BAT - [решено] Как записать информацию из буфера обмена в файл тхт батником? angel_lyucifer Скриптовые языки администрирования Windows 12 26-12-2012 17:22
CMD/BAT - [решено] Дописать текст из файла в файл GoldenSuslik2 Скриптовые языки администрирования Windows 1 13-06-2011 15:22
2003/XP/2000 - Открытие ворда из оутлука Nulex Microsoft Office (Word, Excel, Outlook и т.д.) 5 13-11-2010 15:57
[решено] Как сохранить текст из окна в файл в нужном месте? Firebolt AutoIt 2 27-04-2009 15:57




 
Переход