field script on EVENT EXITING

Hello!!

I have a field called "NAME" and i give this field a default value "" and if the user do not fill in the field his name then i will set a default text in it. Like "NO-NAME" i will do this by lotus script on EVENT EXITING and on the end i will refresh the document. Thanks.....
visAsked:
Who is Participating?
 
fulscherConnect With a Mentor Commented:
Sub Exiting(Source As Field)
     Dim workspace As New NotesUIWorkspace
     Dim uidoc As NotesUIDocument
     Set uidoc = workspace.CurrentDocument
     If uidoc.editmode Then
          if uidoc.FieldGetText("Name") = "" Then
              Call uidoc.FieldSetText("Name", "NO-NAME")
          End if
     End If
End Sub

0
 
schmidCommented:
What is your question?
0
 
ShirishCommented:
test
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.