HCL Domino - Examples: ColumnValues property - 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: ColumnValues property
1. You retrieve a document called currentDoc from a view that has two columns: the first shows the due date of a project (its column formula is the field DueDate), the second describes the project (its formula is "New Project: " + Description).

On the currentDoc, the DueDate item contains 10/16/95 and the Description item contains "Ad Campaign for Acme." Therefore,

currentDoc.ColumnValues(0) equals 10/16/95 currentDoc.ColumnValues(1) equals _ "New Project: Ad Campaign for Acme"

2. You want to look up all the products in the Products view of an Inventory database. This script finds the view and then visits each document in the view to retrieve its first column value (which holds the product name). This is equivalent to performing an @DbColumn.

server$ = "Tilburg" dbfile$ = "inventor.nsf" counter% = 1 Dim db As New NotesDatabase( server$, dbfile$ ) Dim view As NotesView Dim doc As NotesDocument Dim productList( 1 To 100 ) As Variant Dim currentProduct As Variant Set view = db.GetView( "Products" ) Set doc = view.GetFirstDocument While Not ( doc Is Nothing ) ' Get the value on the current document that shows up in ' view's first column ' Append this value to our productList array currentProduct = doc.ColumnValues( 0 ) productList( counter% ) = currentProduct Set doc = view.GetNextDocument( doc ) counter% = counter% + 1 Wend ' There are now counter% - 1 items in the productList

See Also

ColumnValues property

Feedback on Help or Product Usability?

Help on Help

All Help Contents

Feedback on Help or Usability?

Help on Help

All Help Contents