Here is a version that does not look in the WDIR for you automatically
' Helper function for including script libraries.
Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")
Const ForReading = 1
Dim f: Set f = fso.OpenTextFile(fileName, ForReading)
Dim s: s = f.ReadAll()
Thanks for you answer,
I will check it . First thing tomorrow is building a modest library.