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 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 Adding and Replacing Items(4) 使用ReplaceItemValue(1) ReplaceItemValue方法會將指定的數值覆寫已存在的Item數值，假若指定的Item不存在，新的欄位就會產生。 語法 Call NotesDoc.ReplaceItemValue(“ItemName”,”value”) Lesson7 Writing Data to Documents 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 Saving the Document(1) 儲存文件(1) NotesDocument類別的Save方法，可以將文件上任何欄位的變動儲存起來。 語法 Call NotesDoc.Save(force,CreateReponse) Ex. Call doc.Save(True,True) Lesson7 Writing Data to Documents Saving the Document(2) Doc.Save參數(force,CreateResponse)的意義 當儲存文件時，而另一位使用者也正在編輯此文件時，這兩個參數將可以用來決定第二份文件要如何處理。 當Force=True,CreateReponse可省略，因為不會產生影 響。 當Force=False, CreateReponse=True,第二份文件將會變成第一份文件的回應 文件 CreateReponse=False,第二份文件將不會儲存 當文件儲存成功會傳回True,反之則傳回False Lesson7 Writing Data to Documents Adding Author and Reader Item (1) 建立新Item 可以利用NotesItem類別的New方法在特定的文件上建立新的Item。 語法 Set NotesItem = New NotesItem(doc,ItemName,Value,Type) Ex. Set nitem = New NotesItem(doc,”Subject”) Lesson7 Writing Data to Documents Adding Author and Reader Item (2) 建立新作者Item NotesItem類別的New方法有一個參數可以指定Item為作者類型欄位，並儲存使用者名稱到此Item中，使其被允許編輯文件。 Ex. Set nitem = New NotesItem(doc,