Dependent on how many users that need custom settings...

 Code:
Select
  Case @UserID = "601MGR_03"
    writevalue ("HKEY_CURRENT_USER\Environment", "Station", "601100", "REG_SZ")
    writevalue ("HKEY_CURRENT_USER\Environment", "Extension", "601100", "REG_SZ")
    writevalue ("HKEY_CURRENT_USER\Control Panel\Mouse", "SwapMouseButtons", "1", "REG_SZ")
  Case @UserID = "602MGR_01"
    writevalue ("HKEY_CURRENT_USER\Environment", "Station", "601100", "REG_SZ")
    writevalue ("HKEY_CURRENT_USER\Environment", "Extension", "601100", "REG_SZ")
    writevalue ("HKEY_CURRENT_USER\Control 
  Case 1
    ;Maybe write to a log file or just do nothing
EndSelect

LoadCommon()

Function LoadCommon()
  writevalue ("HKEY_CURRENT_USER\Environment", "Formcache", "C:\Cache\cache%station%", "REG_SZ")
  writevalue ("HKEY_CURRENT_USER\Environment", "Extension", %Ext%, "REG_SZ")
  $Function = @Error
EndFunction


Edited by Gargoyle (2009-04-17 08:15 PM)
Edit Reason: bad copy/paste
_________________________
Today is the tomorrow you worried about yesterday.