Hacking Administrators

@LotusEvangelist keith@b2bwhisperer.com
DominoCamp 2021 – June 21 & 22
Hacking
dminis ra ors
Keith Brooks
CEO, B2B Whisperer
HCLAmbassador
@LotusEvangelist 1
Tuesday June 22, 2021 - 12:30 – 14:00

My Path to Admincamp
• Notes Administrator since 1992
• Domino Administrator since Beta in 1996
• LotusEvangelist blog since 2007 (https://blog.vanessabrooks.com)
• Co-Author Quickr Administration Book 2011 + A few IBM Redbooks
• Certificate Exams Writer (Domino, ST, Social) 2012-2014
• IBM Redbooks Thought Leader 2012-2014
• IBM Champion 2013 – 2019
• HCL Ambassador 2019-2021
• Presented at Engage, Lotusphere, IBM Connect, Connected, Think, SUTOL,
Let’sConnect, SOCCNX, The View Admin, MWLUG, NCUG + Many others
• Author of 2020’s Daily Posting of #HCLAmbassadorTIPS
• Openntf Admin Scripts Author
And my 1st AdminCamp!
2

Determination vs Experienced Management 3

Today’s
Missions
1. R12 Notes Clients Can Go Faster
2. Create a Forwarding Address in the Person
Document
3. Converting a Name to an Email Addresses
4. Converting Emails to Hierarchical Names
5. Time Stone Turns Back the Clock
6. Update Your Directory with a Snap
7. Small Things - Sorting your Views
8. Private Views - People by Mail Server
9. Private Views - People by Sametime Servers
10. Replace Group Owners
11. Need a Remote Server Console?
12. Links 4

R12 Improved Network Performance for Notes Clients
Beginning in HCL Notes 12, use the notes.ini setting
NetworkSpeedInMbps to boost network performance of
Notes clients(Windows & Macs) when network speed drops
below a specified level.
• NetworkSpeedInMbps=value, wherevalue is the network
speed in megabytes per second (Mbps) below which
network performance will be boosted.
• For example, to boost performance when the network
speed falls below 8 Mbps, specify NetworkSpeedInMbps=8
5

Create a Forwarding Address in a Person
Document Based on an Email Address
Very valuable, especially when doing domain changes, email
migrations or corporate mergers.
The important piece, which people forget, is handling
when the syntax is caps or lower case, this solves that too.
6/22/2021 6

Create a
Forwarding
Address in a
Person
Document
Based on an
Email
Address
7
Check Your work. If you have anything wrong, edit it again
Click On Action from the Top Menu, and Click the Agent
Save Your agent
Edit The newname.com to the new domain
Edit The existingdomain.com to your domain
Copy Then paste in the code from the next slide
Select Formula
Give The agent a name and a description
Click On Agent
From The NAB top menu, click on Create

Forwarding Address Code
8
SELECT Form = "Person";
@If(
InternetAddress=""; "";
@Do(
addr := @LowerCase(InternetAddress);
tmp := @ReplaceSubstring(addr;
"@existingdomain.com";"@newname.com");
@SetField("MailAddress"; tmp)
)
)

Simple Demo
6/22/2021 9

is Not Always Available to Help You
10
You may receive lists, names, data, emails and other “things“
that have not been cleaned up
Excel is your friend to
manipulate the data to
do your bidding.
Names =
First Name Last Name
ex: Keith Brooks
Emails =
Front @ Domain.Extension
ex: keith@keith.com

Jarvis #1 - Converting a Name to an Email Address
We need to send a survey out; can you help us…
This Requires:
1) Your PNAB
2) Access to your Company Names.nsf
3) A Generic Group Created under Groups in your PNAB
4) The Code from the 2nd slide after this one
5) The List of Names*
11
* = Excel may be needed to manipulate the list USUALLY

Jarvis #1
–
Converting a
Name to an
Email
Address –
Part 1
12
Select The Group and Click on the Icon created
Save The group
Test By copying the names into a new PNAB group
Click OK and Save Toolbar
Paste The Code from the next slide in as a Formula
Type Optional Help text to remember what this does
Type A Name
Click New then select Button
Select The Universal Toolbar to Customize
Click File-Preferences-Toolbar-Customize

Jarvis #1 – Part 2 – The Code
result := "";
realresult := "";
@For (n := 1;n <= @Elements (Members );n := n + 1;
look := @Trim ( @NameLookup ( [Exhaustive];Members [n ]; "InternetAddress" ) );
realresult := @Trim ( @Unique (realresult:look ) );
result := @Trim ( @Unique (result : @If (look= "";@Name ( [Abbreviate];Members [n ] );look ) ) ) );
FIELD comment := @Implode (result;@NewLine );
@Prompt ( [Ok]; "Members " + @Text ( @Elements (Members ) ); "Found " + @Text ( @Elements
(realresult ) )+ " emails for "+ @Text ( @Elements (Members ) )+ " Notes Names" )
13
OpenNTF Admin Scripts: https://openntf.org/XSnippets.nsf/snippet.xsp?id=looking-up-and-converting-a-list-of-notes-names-into-their-email-address
Thank you to @Notesensei

@LotusEvangelist
Show the Example
6/22/2021 14

Jarvis #2 - Converting Emails to Hierarchical Names
We need to create a group and fill it with people
can you help us…
This Requires:
1) Your PNAB
2) A Generic Group Created in your PNAB
3) The Code from the 2nd slide after this one set up as a Toolbar Icon
4) The List of Names*
15
https://booksetcstore.com/products/book-of-spells-notebook-a5-size
* = Excel may be needed to manipulate the list USUALLY

Jarvis #2
–
Converting
Emails to
Hierarchical
Names
–
Part 1
16
Select The Group and Click on the Icon created
Save The group
Test It by copying the emails into a new PNAB group
Click OK and Save Toolbar
Paste The Code from the next slide in as a Formula
Type Optional Help text to remember what this does
Type A Name
Click New then select Button
Select The Universal Toolbar to Customize
Click File-Preferences-Toolbar-Customize

Jarvis #2 – Part 2 - The Code
result := "";
@For(n := 1;n <= @Elements (Members );n := n + 1;
look := @Trim( @NameLookup ( [Exhaustive];Members [n ]; "FullName" ));
result := @Trim( @Unique (result : @If (look= "";@Name ([Abbreviate];Members[n ]);
@Name ([Abbreviate];look)))));
FIELD comment := @Implode (result;@NewLine );
@Prompt([Ok]; "Members " + @Text(@Elements (Members )); "Found " +
@Text(@Elements(result ))+ " Abbreviated Canonical Names for "+ @Text ( @Elements
(Members ) )+ " Users" )
17
OpenNTF Admin Scripts: https://openntf.org/XSnippets.nsf/snippet.xsp?id=converting-regular-common-name-lists-into-notes-hierarchical-names

@LotusEvangelist
Let’s see it in Action
6/22/2021 18

Time Stone
Turning
Back the
Clock
Your Admin ID expired and you are locked out!
1. Shut down the Domino server only
2. Change the date on the OS (Client side too!)
3. Rename log.nsf temporarily
4. Start server, login and recert your ID
5. Shut server down
6. Change Date
7. Delete temporary log.nsf
8. Rename original log.nsf back to log.nsf and
restart server

Update Your Directory with a
Quick way to update “things” in names.nsf ,
or any database with fields or folders.*
• Click Create then Click Agent from the Notes menu
• Provide a Name and Select Simple Actions
• Click OK to go into Designer
• Bottom Left corner you will see
• Click on the button and prepare to be amazed
20
Screenshots on next page

Update Your Directory Page 2
• Look at all those choices!
• Most common is Modify Field
• Select Modify Field from the drop down
• Select Replacing or Appending
• Select the field from the list and Click Add your change
• DONE! Go test it, of course before major usage! 21

6/22/2021 22
Simple Action Demo

Small Things - Sorting Your Views
You know that awesome Rooms and Resources Database?
You can see my slides from yesterday’s class and download
the code parts here http://keithbrooks.com/download/resource.zip
How do you sort views? You know how to do it…right?
Just in case, let’s show you how.
23

Sorting Your Views - Part 2
• You will need a Designer Client
• From Notes, Open the database to get “fixed”
• Click on View- Design
• Under Views, Open the View to be Edited
• Right Click on the Column to be fixed
• Select Column Properties
• Choose a Sort, a Type and check the Blue Circle!
• Click on X to leave the mini Window
• Close the view or Press CTRL-S 24
https://www.lifehacker.com.au/2017/07/why-the-hogwarts-sorting-hat-is-a-bad-idea/
24

6/22/2021 25
Demo Sorting

Top Secret Private Views
for NABs
26
• View with Some Formula Code
People by Mail Server
• View with Lotusscript
People by Sametime
Server

Elige Sapienter*
Private views in the NAB are not new, you do use them, right?
2 options to choose:
• Create view in the Names.nsf DB
• Create views in the Names.ntf Template
If you have a vanilla/standard template I suggest you choose
the 1st option to avoid losing your changes.
If you have a heavily edited template, I suggest the 2nd option as
you understand how to work with the changes.
27
*Choose Wisely

People by Mail Server 1 of 8
Click Save and Customize
Click OK
Use An existing view if you wish
Select A location or the default for it
Enter A name
Click on Create, then Click View
Open Names.nsf/ntf
28

People by Server 2 of 8
• Double Click on the E-Mail column and change the Title to
Mail File
• From the lower window Select Display Field, then Select
MailFile from the dropdown list.
• NOTE: You can ignore any warning message about lost data.
• The other columns should match their fields by name or
change them to match what you wish.
29

• Click on the Name column and in the window below,
paste this FORMULA and Click the Check mark:
@Name([Abbreviate];@Subset(FullName; 1))
• Use a similar process for the Sametime column with this
code and rename it Sametime Server:
@Name([Abbreviate];SametimeServer)
30

• We need a counting column. Your view should look similar to this
• Right Click on the Name column and Click Insert New Column
• Double Click on the blank column and Type “1” (include the “”) in
the formula window on the bottom.
• In the pop up window, change to the sorting
tab and set it like this, don’t forget the
Totals Field on the bottom ->
31

• We need a Country(City) column. So your view should look like this
• Right Click on the Blank Name column and Click Insert New
Column
• Double Click on the blank column, Type either line:
@Name([Abbreviate]; OfficeCountry)
@Name([Abbreviate]; OfficeCity)
in the formula window on the bottom.
• In the pop up window, Click on the sorting
tab and set it like this ->
32

33
• Right Click on the No Name/Blank column we just
created and Click Insert New Column
• Double Click on the blank column and Type:
@Name([Abbreviate];MailServer)
in the formula window on the bottom.
• In the pop-up window, Click on the Font
tab and set it like this <-
• Click on the sorting tab and set it like this ->

People By Server 7 of 8
• Check the Show Twistie when row is expandable
• Also set it for the OfficeCountry column
34

If all went well, you will see something like this:
35
You can customize the columns to your liking

People by Sametime Server
Use the prior slides, but Slide 6 use this code:
@Name([Abbreviate];SametimeServer)
And Can Look Like This
36

6/22/2021 37
Go to the NAB View

Replace Group Owners
New roles, people, teams, someone has to take ownership*
38
https://www.artofvfx.com/avengers-infinity-war-endgame-reel-by-cantina-creative/

6/22/2021 39
Sub Initialize
Dim workspace As New NotesUIWorkspace
Dim session As New NotesSession
Dim dbCurrent As NotesDatabase
Dim doc As NotesDocument
Dim vwGroups As NotesView
Dim uiview As NotesUIView
Dim dcSelected As NotesDocumentCollection
Dim varNewOwner As Variant
Set dbCurrent = session.CurrentDatabase
Set uiview = workspace.CurrentView
Set dcSelected = uiview.Documents
If dcSelected.Count = 0 Then
MessageBox "Please select at least one Group to change the Owner of."
Exit Sub
End If
varNewOwner = workspace.Prompt(PROMPT_OKCANCELEDIT, "New Group Owner", "Enter the name of the
new Group Owner", "")
If IsEmpty(varNewOwner) Then
Exit Sub
End If
Set doc = dcSelected.GetFirstDocument
While Not (doc Is Nothing)
Call doc.Replaceitemvalue("ListOwner", varNewOwner)
Call doc.Save(True, False)
Set doc = dcSelected.GetNextDocument(doc)
Wend
Print "Complete"
End Sub
Replace Group Owners Code

Change an Owner
6/22/2021 40

Need a
Server
Console?
Old trick but still works!
• Click File -> Preferences -> Toolbar
-> Customize
• Click on New and select Button
• Under 'Button caption text', type a
name (Rconsole)
• Click on Command & Functions
button to select Commands
• Select AdminRemoteConsole
• Click on Paste button
• Click on OK
• Click Save Toolbar and click on OK.

@LotusEvangelist
Remote Console Demo
6/22/2021 42

Links You May Need
43
The Lotus Sandbox, Treasure Trove of scripts, database templates and History
http://domquery.info/samples/sandbox.nsf
/
The Nifty 50 Templates (R3/R4 era)
https://www.wissel.net/blog/2009/02/the-nifty-fifty-unearthed.html
Speed up your Clients (The Designer client edit)
https://tinkertry.com/speed-up-lotus-notes-8-5-3-or-ibm-notes-9-social-edition-under-windows-7-8-81-or-linux
All-in-one Admin Tool for agent-based troubleshooting & problem solving
https://bit.ly/3pZukfT
The OOO (Out of Office) Diagnostic Tool
See the above Admin Tool download for it
Download my RnR Template with all of the Views and Agents included
https://keithbrooks.com/download/resource.zip

Hacking
Administrators
AdminCamp
Review
• R12 Notes Clients Can Go Faster
• Create a Forwarding Address in the Person
Document
• Converting a Name to an Email Addresses
• Converting Emails to Hierarchical Names
• Time Stone Turns Back the Clock
• Update Your Directory with a Snap
• Small Things - Sorting your Views
• Private Views - People by Mail Server
• Private Views - People by Sametime Servers
• Replace Group Owners
• Need a Remote Server Console?
• Links
44

45
Thank You Questions?

Hacking Administrators

More Related Content

What's hot (9)

Similar to Hacking Administrators (20)

More from Keith Brooks (20)

Recently uploaded (20)

Hacking Administrators