Wer die Umgebungsvariablen nicht per Hand setzen will machts so:
Set objShell = CreateObject("WScript.Shell")
Set env = objShell.Environment
EnvStr = env.Item("Path")
If InStr(EnvStr,"%SystemRoot%\Microsoft.NET\Framework\v1.0.3705") = 0 Then
IF Right(EnvStr,1) <> ";" Then
EnvStr = EnvStr & ";"
End If
EnvStr = EnvStr & "%SystemRoot%\Microsoft.NET\Framework\v1.0.3705;" & _
"C:\Programme\Microsoft Visual Studio .NET\FrameworkSDK\Bin;"
env.Item("Path") = EnvStr
End IF
Wscript.Echo env.Item("Path")
Set env = Nothing
Set objShell = Nothing