Egy valami kis kézi eszköz egyszeri szinkronizációjához szükségem volt arra hogy az Outlook névjegyalbumból kipakoljam a bejegyzéseket vcf formátumba. Ahogy elnéztem ezt a drága Outlook csak egyesével hajlandó előadni. Gyorsan összedobtam egy scriptet rá. Azt, ha keletkezett név nem felel meg a fájlnév konvencióknak nem kezeli le, de egyenlőre nekem ennyi elég volt. Minden egyéb magyarázat helyett itt a kód:
var olFolderContacts = 10; var olContact = 40; var olVCard = 6; var Application; var Namespace; var ContactsFolder; var TargetFolder; Application = new ActiveXObject("Outlook.Application"); Namespace = Application.GetNamespace("MAPI"); ContactsFolder = Namespace.GetDefaultFolder(olFolderContacts); TargetFolder = "c:\\work\\vcf\\"; e = new Enumerator(ContactsFolder.Items); for(;!e.atEnd();e.moveNext()) { Item = e.item(); if(Item.Class == olContact) { Item.SaveAs(TargetFolder + Item.FileAs + ".vcf",olVCard); } }
Recent Comments