updating the path

[emmanuel]

I have this program that is a completely manual install. so I'm sitting here half an hour after I should have left work writing a install for it... I have to check the path and make sure these three items are there... this could be made a UDF, and I'm sure I will, once I get around to it... for now, if you want to do it, you can...

;checking the path
$_path = EnvGet("PATH")
if StringInStr($_path, "%FORTE_ROOT%\install\bin") = 0 Then $newpath = $_path & ";%FORTE_ROOT%\install\bin"
if StringInStr($_path, "%FORTE_ROOT%\userlib") = 0 Then $newpath = $_path & ";%FORTE_ROOT%\userlib"
if StringInStr($_path, "C:\Program Files\Caminus\Common") = 0 Then $newpath = $_path & ";C:\Program Files\Caminus\Common"

RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment", "PATH", "REG_SZ", $newpath)

EnvUpdate()

Edited June 10, 2004 by emmanuel