.

HCLSoftware Business Partner
Domino Consulting Services
CRUCIAL Notes Tools
+1 212-599-2048

Domino Consulting Services
CRUCIAL Notes Tools
Domino administration
Notes development

Facebook Twitter YouTube
Chat now       
.
ProductsDownloadsNewsAbout usContact


Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUSSCRIPT/COM/OLE CLASSES

Examples: OnBlur event
This is the OnBlur event for the "Subject" field of a form. It forces the user to enter a value.

Sub Onblur(Source As Field)
 Dim ws As New NotesUIWorkspace
 Dim uidoc As NotesUIDocument
 Set uidoc = ws.CurrentDocument
 If uidoc.FieldGetText("Subject") = "" Then
   uidoc.GotoField("Subject")
   Print "Subject cannot be blank"
 Else
   Print "Subject: """ & uidoc.FieldGetText("Subject") & """"
 End If
End Sub

See Also