使用VBS解析大型Outlook邮箱

Question

我正在编写一个vbs，用于检查给定日期的电子邮件主题中的一组封闭的首字母，然后根据结果输出报告。我有它的工作，但它很慢。它正在搜索的文件夹中有几千封电子邮件，所以它可能只是那个，但我只是想知道是否有人对如何加快它有任何想法？

下面是花费时间执行的代码。 Push只是一个辅助函数，可以将项放入数组中;

`For Each oItem In cItems
if TypeName(oItem) = "MailItem" then
dateTemp = Formatdatetime(oItem.ReceivedTime, 2)
    If datevalue(dateTemp) = datevalue(requiredDate) Then
    test = oItem.subject
        if mid(test, 1, 1) = "[" AND mid(test, 4, 1) = "]" then
            push subjectArray, test
        end if
    end if
end if
Next`

Answer 1

快速解析项目的最佳选择是使用表格对象：https://msdn.microsoft.com/en-us/library/ff869529.aspx

如果您希望获得最佳性能，请将MAPI直接与C ++（或Redemption COM）一起使用多线程。