This forum is closed to new posts and
responses. The content has been migrated to the Digital Solutions Community. Please join us there for new content as well as this content. For customer support, please visit the official HCL customer support channels below:
~Vanessa BreresalyliHolly Cisaburakoi 23.Feb.10 06:36 PM a Web browser Domino Designer7.0.3Windows XP
Hi,
I have a function where I have passed the collection vc,
some how the doc is nothing, yet i am setting it.. and this time there are 5 entries in the vc
Function CreateRepport(vc) As Variant
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim entry As NotesViewEntry
Dim range As Variant
Dim TheCellCounter As Integer
Dim workbooks As Variant
Dim numrecs As Double
Dim session As New NotesSession
Dim Ws As New NotesUiWorkspace
Set db = session.CurrentDatabase
Set entry = vc.GetFirstEntry
Stop
While Not entry Is Nothing
Set Doc = entry.Document
TheCellCounter = TheCellCounter + 1
.....
Total = Total + Doc.Debit(0)
'get the next record
Set entry = vc.GetNextEntry(entry)