Чтобы возвращать только базы данных из определенной папки, вам придется выполнить некоторую работу по фильтрации самостоятельно. Я сделал это несколькими способами. Один из способов - использовать свойство FilePath базы данных, а затем проверить, находится ли путь под почтовой папкой. Другой способ - проверить шаблон базы данных. Это немного меньше, если все ваши почтовые файлы настроены на определенный шаблон базы данных и никакие нежелательные базы данных не используют этот шаблон.
Первый метод:
If _localDatabase.IsOpen Then
If Instr(1, "mail", _localDatabase.FilePath, 5) <> 0 Then
'do work here
End If
End If
Второй метод:
If _localDatabase.IsOpen Then
If _localDatabase.DesignTemplateName = MAIL_TEMPLATE_NAME Then
'do work here
End If
End If