Here’s a little script written in Visual Basic to export all your contacts in Microsoft Outlook 2003 to VCF files.
1 2 3 4 5 6 7 8 9 10 11 12 | Sub exportContacts() Dim namespace As namespace Dim contacts As MAPIFolder Dim contact As ContactItem Set namespace = Application.GetNamespace("MAPI") Set contacts = namespace.GetDefaultFolder(olFolderContacts) For Each contact In contacts.Items contact.SaveAs "C:\Temp\" & contact.Subject & ".vcf", olVCard Next End Sub |
The destination folder is C:\Temp\. You can easily change that by editing the statement contact.SaveAs in the snippet above.




