Всем привет! Хочу очищать все контактные записи в Outlook. Как это сделать? Вот кусок кода, мне нужно в цикле удалить. Через Delete() не работает ((

Соединение=Новый COMОбъект("Outlook.Application");
   ПространствоИмен=Соединение.GetNameSpace("MAPI");
   АдреснаяКнига=ПространствоИмен.AddressLists("Глобальный список адресов");
   КоличествоЗаписей=АдреснаяКнига.AddressEntries.Count();
   Для сч=1 По КоличествоЗаписей Цикл
       ТекЗапись=АдреснаяКнига.AddressEntries(сч);
   КонецЦикла;