Notes 6.5 autoconfiguration script

I have completed a script that fully automates the Notes 6.5 configuration process for environments that have Notes 5.x currently installed (and for environments that use 6.5 but are not able to fully roam).  For networks that have workstations using Notes 6.5 and local configuration files, at present the only solution is to manually configure the workstation by using the wizard and copying over key data files from the user's Notes 5.x install folder; files such as their ID file, the names.nsf, etc.  This requires a technician to have the user present and or get the user's domain username and password as well as their Notes password. For large corporate networks requiring hundreds or many thousands of upgrades this is not a viable option.  IBM has not provided a solution and nothing else exists so I wrote one in vbScript. 

It uses a combination of many aspects of vbScript, file reading, writing, copying, folder creation and permission settings, registry editing, excel file creation and reading, and more.  If nothing else the script should be a great reference for how to do various tasks with vbScript.

It works well and it is very cool.  I have used this script to save my company hundreds of thousands of dollars in manpower (and I'm not even in engineering) :)

It is 431 lines with full comments.  There are also companion scripts to distribute the script and to interpret the logfiles.  Obviously it has some information that is specific to my company which I wil remove before sending.  Anyway, that said the formatting wouldn't hold up when I tried to put it in as pasted code and I can't upload till I have 20 posts.  So... if anyone out there needs a proven solution for a Notes 6.5 migration, I have a solid working answer.  You'll have to respond to this or email me and I can get you the code.

Best regards,
Tony :)

ps: Thanks to the vbScripting community as a whole.  My script would not have been possible without the many online resources I used to research and teach myself vb and what was and wasn't possible with it.

Here's a few lines for the hell of it:

 Const LogFile = "\\yourserverandshare\goeshere\logs\" ' MODIFY THIS LINE TO REFLECT YOUR OWN SERVER PATH
 Const TristateFalse = 0
 Const ForReading = 1
 Const ForWriting = 2
 Const ForAppending = 8
 
 ' Create and bind to objects for file system, network, etc.
 Set FSO = CreateObject("Scripting.FileSystemObject")
 Set WSHNetwork = CreateObject("WScript.Network") 
 Set WSHShell = Wscript.CreateObject("wscript.shell")
 Set WSHSysEnv = WSHShell.Environment("process")
 
 ' Define variables and set default flags
 strUser = UCase(WSHNetwork.UserName)
 strMachine = UCase(WSHNetwork.ComputerName)
 strNotesData = wshsysenv("USERPROFILE") & "\local settings\application data\Lotus\Notes\Data\"
 strWinVer = WSHShell.RegRead("HKLM\Software\Microsoft\Windows NT\CurrentVersion\CurrentVersion")
 strnewNotesini = strNotesData & "notes.ini"
 strOldNotesini = "p:\notes\notes.ini"
 strNotesVersion = "5.08"
 tmpFolder = "C:\NACFG" & strUser & "\"
 BackupStatus = false
 addNames = "No"
 

Can I have a copy of this. I am about to start the same think at my company.
 
(I have sent you an e-mail as well)

Go ahead and post the scripts you have for this; the formatting may be a little off, but I would be interested in taking a look at it.

This is great! Can i also get the code please? If I can do anything in return...