HCL Domino - Examples: RemoveItem method - Need a Domino Consultant? Call NotesMail +1 212-599-2048

HCLSoftware Business Partner Domino Consulting Services CRUCIAL Notes Tools +1 212-599-2048	Domino Consulting Services CRUCIAL Notes Tools Domino administration Notes development	Chat now
.

Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUSSCRIPT/COM/OLE CLASSES

Examples: RemoveItem method
1. This script removes the Subject item from a document.

Dim mainDoc As NotesDocument '...set value of mainDoc... Call mainDoc.RemoveItem( "Subject" ) Call mainDoc.Save( True, True )

2. This script removes all file attachments from a document.

Dim doc As NotesDocument '...set value of doc... Call doc.RemoveItem( "$FILE" ) Call doc.Save( True, True )

3. This sub lets you change the name of any item in a document. First it uses ReplaceItemValue to put the contents of the item with the old name into a new item with the new name. Then it uses RemoveItem to remove the item with the old name.

Sub changeField _ ( doc As NotesDocument, oldName As String, _ newName As String ) If doc.HasItem( oldName ) Then Call doc.ReplaceItemValue( newName, _ doc.GetItemValue( oldName ) ) Call doc.RemoveItem( oldName ) Call doc.Save( False, True ) End If End Sub

For example, to change the name of the phone item to officePhone without losing the item's value, a script makes the following call:

Dim doc as NotesDocument '...set value of doc... Call changeField( doc, "phone", "officePhone" )

4. This sub takes a collection of documents and removes the stored form from each document. It uses RemoveItem to delete the five fields that make up a stored form in a document: $TITLE, $INFO, $WINDOWTITLE, $BODY and $ACTIONS.

Sub removeStoredForm_ ( collection As NotesDocumentCollection ) Dim doc As NotesDocument Set doc = collection.GetFirstDocument() While Not(doc Is Nothing) If doc.HasItem( "$TITLE" ) Then formName = doc.GetItemValue( "$TITLE" ) Call doc.ReplaceItemValue( "Form", formName ) Call doc.RemoveItem( "$TITLE" ) Call doc.RemoveItem( "$INFO" ) Call doc.RemoveItem( "$WINDOWTITLE" ) Call doc.RemoveItem( "$BODY" ) Call doc.RemoveItem( "$ACTIONS" ) Call doc.Save( True, True ) End If Set doc = collection.GetNextDocument(doc) Wend End Sub

See Also

RemoveItem method

Feedback on Help or Product Usability?

Help on Help

All Help Contents

Feedback on Help or Usability?

Help on Help

All Help Contents