LOTUSSCRIPT/COM/OLE CLASSES
Sub Querysave(Source As Notesuidocument, _ Continue As Variant) Dim session As New NotesSession Call session.SetEnvironmentVar _ ("HomeTown",source.FieldGetText("HomeTown")) End Sub