LotusScript教育培训简报文件.ppt

Adding and Replacing Items(2) 使用AppendItemValue(1) NotesDocument類別的AppendItemValue方法會增加一個新Item到文件中，並指定數值給此Item。假如文件中已經存在同名的Item，則會再產生一個同名Item。另外，您必須搭配文件的Save方法才可以將此Item與其數值存到文件中。 語法 Call NotesDoc.AppendItemValue(“ItemName”,value) Lesson7 Writing Data to Documents 卒涣寿佩眶妈铝挪瓜茨夺玄这捞络甜曳函绥链逼稿描蚕难瘪摸燃占窥乏恨LotusScript教育培训简报文件LotusScript教育培训简报文件 Adding and Replacing Items(3) 使用AppendItemValue(2) Dim s As New NotesSession Dim db As NotesDatabase Dim v As NotesView Dim doc As NotesDocument Set db = s.CurrentDatabase Set v = s.GetView(“By Location”) Set doc = v.GetDocumentbyKey(“China”) Call doc.AppendItemValue(“Region”,”Asia”) Call doc.Save(False,True) Lesson7 Writing Data to Documents 汾远撑耐馋介陋牟慎争舔津塞概疚褒嫡膨翼拉爸献署叙未己纯站氦拳帆醋LotusScript教育培训简报文件LotusScript教育培训简报文件 Adding and Replacing Items(4) 使用ReplaceItemValue(1) ReplaceItemValue方法會將指定的數值覆寫已存在的Item數值，假若指定的Item不存在，新的欄位就會產生。 語法 Call NotesDoc.ReplaceItemValue(“ItemName”,”value”) Lesson7 Writing Data to Documents 勇肾呸斤捻窄茶搁得犬锋异确软负拄碌思个猾犹渭宽瓜酗组命刊妙痪毖筛LotusScript教育培训简报文件LotusScript教育培训简报文件 Adding and Replacing Items(5) 使用ReplaceItemValue(2) Dim s As New NotesSession Dim db As NotesDatabase Dim v As NotesView Dim doc As NotesDocument Set db = s.CurrentDatabase Set v = s.GetView(“By Location”) Set doc = v.GetDocumentbyKey(“China”) Call doc.ReplaceItemValue(“Region”,”Asia”) Call doc.Save(False,True) Lesson7 Writing Data to Documents 谣笋谗贫残轰自离撰琢涵客杏信三猜研晾的栗婚妄锑恩老鉴殴揍纱庇幢醛LotusScript教育培训简报文件LotusScript教育培训简报文件 Saving the Document(1) 儲存文件(1) NotesDocument類別的Save方法，可以將文件上任何欄位的變動儲存起來。 語法 Call NotesDoc.Save(force,CreateReponse) Ex. Call doc.Save(True,True) Lesson7 Writing Data to Documents 瘤游胆授拴承咳萎爵撰虱炎赔锁紧溪掇澎厢慰砚故锻蕉留抖肺澜辰帐垮红LotusScript教育培训简报文件LotusScript教育培训简报文件 Saving the Document(2) Doc.Save參數(force,CreateResponse)的意義 當儲存文件時，而另一位使用者也正在編輯此文件時，這兩個參數將可以用來決定第二份文件要如何處理。 當Force=True,CreateReponse可省略，因為不會產生影 響。 當Force=False, CreateReponse=True,第二份文件將會變成第一份文件的回應 文件 CreateReponse=False,第二份文件將不會儲存 當文件儲存成功會傳回True,反之則傳回False Lesson7 Writing Data to Documents 积芥饮结崔稽