LotusScript for Visual Basic Programmers - IBM Redbooks

Other Recent Language Additions
Recent VBA and VB4 syntactical enhancements have been included in the
current release of LotusScript. Statements like With and ForAll are found in
LotusScript. As an example, ForAll allows you to easily do something to
every item within a LotusScript collection, such as a list or an integer array:
dim iSalary(20) as integer
forall x in iSalary
x = x * 1.5 ' let’s give them a raise they won’t forget!
end forall
Other interesting statements include Datatype (variable) which returns the
datatype associated with the object you pass it. Datatype is similar to Visual
Basic’s If TypeOf statement, but requires a lot less work.
Note that the LotusScript End statement is not directly equal to Visual
Basic’s End. The End statement in LotusScript stops the currently executing
script, and to exit the application in the way you would with Visual Basic’s
End, you generally use the appHalt function. If you are within Lotus Notes,
you can use the Close macro to easily (and safely) shut the application
down.
Error Handling
LotusScript provides the same type of error handling syntax as Visual Basic
Release 4, allowing for Err, Erl, Error, Resume, Resume Next, On Error
Goto label, and so on.
For example, the following code can be used in both LotusScript and Visual
Basic.
Sub cmdUpdateDB_Click ( )
cmdUpdateDBErr:
10 LotusScript for Visual Basic Programmers
On Error GoTo cmdUpdateDBErr:
' process database updates here...
Exit Sub
' The HandleErr( ) call provides a way to
' centralize your error processing. The code for
' the HandleErr call is shown in the
' object-oriented section below.
If HandleErr(Err, Error$, _