.

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: GetForm method
This script checks for the existence of a form by trying to access it with GetForm.

Dim session As New NotesSession
Dim db As NotesDatabase
Dim form As NotesForm
On Error Goto processError
Set db = session.CurrentDatabase
formNameIn = Inputbox("Name of form?")
Set form = db.GetForm(formNameIn)
Messagebox "The form """ & form.Name & """ exists"
Exit Sub
processError:
REM     If Err() = ErrObjectVariableNotSet Then
If Err() = 91 Then
    Messagebox  _
    "The form """ & formNameIn & """ does not exist"
Else
    Messagebox "Error " & Err() & ": " & Error()
End If
Exit Sub

See Also