Hi forum members

I am trying to add an extra folder eg C:\new to the existing path in the Environment variables using VB6.

I tried the following:

Declare Function SetEnvironVar Lib "kernel32" Alias "SetEnvironmentVariableA" (ByVal lpName As String, ByVal lpValue As String) As Long

Now_path$ = Environ("Path")
SetEnvironVar "path", Now_Path$ & ";C:\new"

but it did not work. Where did i go wrong? Help appreciated.