2014-09-03 36 views
0

我在Lotus Notes中有大量上傳的文檔。但是作者字段在這些文檔中不可用。所以用戶無法編輯文檔。它顯示你沒有被授權。我需要添加一個類型爲「文本列表」的新字段「hdndocauthor」字段。如何在舊的Lotus Notes文檔中添加作者字段

任何人都可以幫助我,如何做到這一點。

+1

如果用戶的全部或子集應能夠編輯在數據庫中的每個文檔只需要設置訪問級別「編輯」給所有這些用戶。 – 2014-09-03 13:25:11

+0

我只想指出,一個簡單的公式代理可以輕鬆地添加hdndocauthor字段,但問題是這將是一個簡單的文本列表,而不是讀/寫訪問名單,這是你真正想要的。然後您可以刷新所有文檔,但是如果有文檔無法驗證formuilas,那麼您需要永久性地跟蹤它們並修復它們。所以Jochen的答案中的腳本方法絕對是做到這一點的最佳方式。 – 2014-09-03 22:23:47

回答

2

使用LotusScript:

Dim item As NotesItem 
Set item = doc.ReplaceItemValue("hdndocauthor", values) 
item.IsAuthors = True 

其中文檔引用的底層[後端]的文件,和值是所希望的作者姓名,必須以規範格式來提供的變體或字符串數​​組。

+0

代碼必須由具有編輯者訪問權限或更多人員執行。將代碼放入代理中,通過'.UnprocessedDocuments'獲取選定的文檔,並在要設置作者字段的所有文檔上執行代理。 – 2014-09-03 13:21:39

+0

不要忘記打電話給doc.save()! – 2014-09-03 22:21:15

+0

可縮寫爲:doc.ReplaceItemValue(「hdndocauthor」,values).IsAuthors = True – 2014-09-04 13:48:59

0

要添加一個新的領域,你也可以使用NotesItem構造與AUTHORS作爲specialType%參數:

Dim item As New NotesItem(doc, "hdndocauthor", users, AUTHORS)