By submitting your personal information, you agree that TechTarget and its partners may contact you regarding relevant content, products and special offers.
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