By submitting your email address, you agree to receive emails regarding relevant topic offers from TechTarget and its partners. You can withdraw your consent at any time. Contact TechTarget at 275 Grove Street, Newton, MA.
use the script below.
Dim s as New NotesSession
Dim db as NotesDatabase
Dim view as NotesView
DIm doc as NotesDocument
Set db = s.currentDatabase
Set view = db.GetView("NewView")
Set doc = view.GetFirstDocument