2011-05-16

LotusScript 如何解決 AppendItemValue 無效的問題 ?

其實,在 Lotus Designer 的 Help 裡就有寫到說,比較建議用 ReplaceItemValue 來改變欄位的值,不建議使用 AppendItemValue 來新增值,如果你有用 AppendItemValue 來為一個多重值欄位 ( Multi-Text Field ) 來新增一個值的時候,就會發現,AppendItemValue 有時候會完全沒有動的樣子,也就是無法新增一個值到多重值的欄位。

阿舍有看過有人用另外建立一個陣列或 List 來塞欄位值,然後,再透過增加陣列或 List 的大小來放入新的值,之後,再用 ReplaceItemValue 來把這個陣列或字串放回欄位去,整個過程有一點點的小複雜哩 ! 其實,可以不用這麼複雜的,只要透過 NotesItem 這個物件的 AppendTextToList 就可以解決了哩 !

假設我們要在 Phone 這個多重值欄位再加入一組 0988888888 的電話號碼,那麼程式只要這樣寫就可以把電新增到 Phone 欄位去了。

Dim itmPhone as NotesItem

Set itmPhone = doc.GetFirstItem("Phone")
Call litmPhone.AppendToTextList(“0988888888")

Call doc.Save(false,true)


[+] Ubuntu 指令新手會用到的35個技法 - 這是以阿舍的使用經驗編寫出來的電子書,三天內應該就看的完,學的起來哩 ! 有空就參考一下囉 ! ... ^^=

關於阿舍

好文不藏私,請多分享囉!! ^^=



沒有留言 :

張貼留言

如果留言後,發現留言不見了,這通常是因為 Goolge 把它認為是垃圾留言了,請用信件通知阿舍調整 ( ayubiz@gmail.com )。謝謝 !