LOTUSSCRIPT/COM/OLE CLASSES
Examples: Using environment variables
1. This button example increments the environment variable $SeqNo by one and prints the result. (This script would not be reliable on a server for maintaining a system of sequential numbers.)
Sub Click(Source As Button)
Dim session As New NotesSession
seqNo = session.GetEnvironmentValue("SeqNo")
If Isempty(seqNo) Then
Call session.SetEnvironmentVar("SeqNo", 1)
Else
seqNo = seqNo + 1
Call session.SetEnvironmentVar _
("SeqNo", Cint(seqNo))
End If
Messagebox session.GetEnvironmentValue("SeqNo")
End Sub
2. This agent example prints the value of a system environment variable. GetEnvironmentString is used to accept an environment variable that is either a number or a string. The second argument to GetEnvironmentString is true so that a dollar sign is not prepended to the name of the environment variable.
Sub Initialize
Dim session As New NotesSession
envVarName = Inputbox$("Environment variable name")
envVar = session.GetEnvironmentString(envVarName, _
True)
If envVar = "" Then
Messagebox(envVarName & " not set")
Else
Messagebox(envVarName & " = " & envVar)
End If
End Sub
See Also
Using environment variables
Glossary
Feedback on Help?
Help on Help
Open Full Help Window
Glossary
Feedback on Help?
Help on Help
Open Full Help Window