如何自動從雷鳥

Question

導出聯繫人是否有某種方式悄悄使用腳本來導出CSV雷鳥聯繫，所以我們就不必爲每個用戶做手工？

我的目的是把所有收集的地址（存儲在history.mab）雷鳥到Outlook 2013在多個站點。

Answer 1

經過一番研究，有可能是沒有筆直的路該怎麼做。

我已經結束了這個簡單的宏，它啓動Thunderbird，通過ADRESS簿導出選定的聯繫人列表到CSV - 很不理想，但在大多數情況下工作。

SET oShell = CreateObject("WScript.Shell") 

oShell.Run """C:\Program Files (x86)\Mozilla Thunderbird\thunderbird.exe""" 
WScript.Sleep 10000 ' wait a bit for opening Thunderbird 
oShell.SendKeys "^+b" 'open address book 
WScript.Sleep 2000 
oShell.SendKeys "{TAB}{TAB}" 
oShell.SendKeys "{DOWN}" 
oShell.SendKeys "%n" 
oShell.SendKeys "x" 
WScript.Sleep 2000 
oShell.SendKeys "thunderbird_export_" & username & "" 'name your CSV 
WScript.Sleep 1000 
oShell.SendKeys "{TAB}" 
oShell.SendKeys "{DOWN}{DOWN}" 
oShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 
oShell.SendKeys "^l" 
WScript.Sleep 1000 
oShell.SendKeys "u:{ENTER}" 'set destination folder 
WScript.Sleep 1000 
oShell.SendKeys "%u" 
WScript.Sleep 1000 
oShell.SendKeys "{ENTER}" 
WScript.Sleep 1000 

' close both adress book and Thunderbird 
oShell.Run("taskkill /im thunderbird.exe") 
WScript.Sleep 1000 
oShell.Run("taskkill /im thunderbird.exe") 

WScript.Quit 

（只打算用列表的不斷工程量）