.
HCLSoftware Business Partner
Domino Consulting Services
CRUCIAL Notes Tools
+1
212-599-2048
Domino Consulting Services
CRUCIAL Notes Tools
Domino administration
Notes development
Chat now
.
EN - English
CN - 中文
JP - 日本語
DE - Deutsch
FR - Français
BR - Português
RU - Pу́сский
IT - Italiano
IN - हिन्दी
ES - Español
KR - 한국어
ID - Indonesia
NL - Dutch
TR - Türkçe
SA - العربية
SE - Svenska
NO - Norsk
PL - Polski
TH - ไทย
DK - Dansk
MY - Malay
PH - Filipino
GR - Ελληνικά
FI - Suomi
IL - עברית
IE - Gaeilge
CZ - Čeština
UA - Українська
RO - Română
VN - Tiếng Việt
BD - বাংলা
HU - Magyar
Need a Domino Consultant? Call NotesMail +1 212-599-2048
-
HCLSoftware Business Partner
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
Feedback on
Help
or
Product Usability
?
Help on Help
All Help Contents
Feedback on
Help
or
Usability
?
Help on Help
All Help Contents