Hi,
I’m creating a VB app to pull data from a notes database, part of what I am doing is populating a ListBox with a column from a View, however the only way I have found of doing this is reading each line at a time and to be honest it’s very slow, is there a faster way of doing this? i.e pulling the whole column in one go?
Private Sub Main_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Show()
Dim db As Object
Dim NotesSession As Object
Dim view As Object
Dim doc As Object
NotesSession = CreateObject("Notes.NotesSession")
'Call NotesSession.Initialize()
db = NotesSession.GetDatabase("Removed", "Removed", False)
If Not db Is Nothing Then
'--------STATION 1--------
view = db.GetView("Removed")
doc = view.GetFirstDocument()
While Not (doc Is Nothing)
lstStation1.Items.Add(doc.GetFirstItem("PipeNo").Text)
doc = view.GetNextDocument(doc)
End While
Else
MsgBox("Failed to find Database")
End If
End Sub