2011-08-05 61 views
1

我想知道在Outlook 2003/2007的VBA中是否有類似於「Like」的東西,就像SQL中的LIKE一樣...贊在VBA中的項目?

例如,網絡中有多個用戶,並且每個人都有另一個郵箱名稱。

,所以我想是這樣的:

Set olApp = New Outlook.Application 
Set olNs = olApp.GetNamespace("MAPI") 
Set TopFolder = olNs.Folders.Item("Mailbox - *") '<----- here i was thinking of something like a LIKE 
Set SubFolder = TopFolder.Folders.Item("Projekte") 
Set Folder = SubFolder.Folders 

感謝您的幫助

回答

4

有一個在VBA一個LIKE字符串模式匹配,但在使用中的情況下,需要遍歷在olNs.Folders集合中的項目名稱上,並將它們與您的模式進行比較;

if sFolderName like "Mailbox - *" then 
    Set TopFolder = olNs.Folders.Item(sFolderName) 
    exit for 
    ... 
+0

非常感謝:) – VanDeath