LOTUSSCRIPT/COM/OLE CLASSES

Examples: Remove method
This script removes a form from a database.

Dim session As New NotesSession
Dim db As NotesDatabase
Set db = session.CurrentDatabase
formNameIn = Lcase(Inputbox("Name of form?"))
Forall form In db.Forms
 If Lcase(form.Name) = formNameIn Then
   If Messagebox("Do you really want to delete " _
   & form.Name & "?", _
   4 + 32) = 6 Then
     Messagebox form.Name & " removed"
     Call form.Remove()
   Else
     Messagebox form.Name & " not removed"
   End If
   Exit Sub
 End If
End Forall
Messagebox "The form """ & formNameIn & """ does not exist"

See Also