HCL Domino - Examples: GetNextDatabase 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: GetNextDatabase method
1. This LotusScript agent gets all the databases on the server Snapper.

Sub Initialize Dim dbdir As New NotesDbDirectory("Snapper") Dim db As NotesDatabase Set db = dbdir.GetFirstDatabase(DATABASE) While Not(db Is Nothing) Msgbox db.Title, , db.FileName Set db = dbdir.GetNextDatabase Wend End Sub

2. This Visual Basic code using COM gets all the databases on the server Snapper.

Private Sub GetNext_Click() Dim s As New NotesSession s.Initialize Dim dir As NotesDbDirectory Dim db As NotesDatabase Set dir = s.GetDbDirectory("Snapper") Set db = dir.GetFirstDatabase(NOTES_DATABASE) While Not (db Is Nothing) MsgBox db.Title, , db.FileName Set db = dir.GetNextDatabase Wend End Sub

See Also

GetNextDatabase method

Feedback on Help or Product Usability?

Help on Help

All Help Contents

Feedback on Help or Usability?

Help on Help

All Help Contents