如何从MAPIFolder中删除所有DistListItems？

import win32com.client

def delete_all_distlistitems(folder):
    outlook = win32com.client.Dispatch("Outlook.Application")
    namespace = outlook.GetNamespace("MAPI")
    target_folder = namespace.GetDefaultFolder(folder)
    items = target_folder.Items
    for item in items:
        if item.Class == 5:  # DistListItem
            item.Delete()

# 使用示例
delete_all_distlistitems(10)  # 10代表默认的联系人文件夹