2015-10-16 75 views
0

我是lotusscripting中的新手,對於我來說很難弄清楚。 所以..我真的需要你的幫助。通過視圖創建NotesdocumentCollection

我有一個notesview有一個類別,請求類型和名稱的列..我需要按類別和請求類型排序它們。

這是我創建文檔集合的代碼..我不知道它是否正確。

請求類型:刪除/添加 類別: 「0001」

Set BadgeCol = badgeview.GetAllDocumentsByKey("Delete",False) 
Call BadgeCol.PutAllInFolder("BDel") 

Set Badgedoc = badgecol.GetFirstDocument() 

我不知道什麼在此之後下一個...

enter code here 

回答

2

由於德米特羅指出,要做到這一點的最好辦法,就是您的視圖的列進行排序,做排序。

但請注意:Set BadgeCol = badgeview.GetAllDocumentsByKey("Delete",False)將alyways給你一個未分類的集合。如果你想利用視圖排序,那麼你需要使用NotesViewEntryCollection而不是NotesDocumentCollection。兩者在通過它們循環方面的工作幾乎相同。

您的代碼可能是這樣的,那麼:

Dim BadgeCol as NotesViewEntryCollection 
Dim badgeEntry as NotesViewEntry 
Dim badgeDoc as NotesDocument 

Set BadgeCol = badgeview.GetAllEntriesByKey("Delete",False) 

Set badgeEntry = badgecol.GetFirstDocument() 
While not badgeEntry is Nothing 
    Set badgeDoc = badgeEntry.Document 

    '- do whatever you need: Read items, create an array, whatever... 

    Set badgeEntry = badgecol.GetNextDocument() 
Wend 
+0

謝謝託斯滕!當我在第一個數據庫嘗試你的代碼..它工作..但它不會返回任何值..當我在其他數據庫上嘗試它..我一直在得到一個錯誤..它真的getFirstDocument?不是GetFirstEntry? 我真的很抱歉..這是我第一次使用lotusscript ..我需要獲得兩個數據庫的文檔。謝謝! – TeamTam

+0

請打開另一個線程,確切的問題和導致您的問題的代碼,評論不適合調試代碼... –