Lav en SET kommando

Måske er det fordi din første linie Dim'er en variabel WshSell, mens din Set bruger WshShell?

Ja, hvad vil du gøre ?

Jeg ville bruge det samme navn (WshSell <> WshShell)?

Kunne også være, at du skal bruge formen:

Returncode = WshShell.Run "SET 123=blahblah", 1, True

Da du har sat bWaitOnReturn til True, returneres en evt. error code, som det kaldte program måtte generere.

Ref.: http://msdn.microsoft.com/archive/default.asp?url=/archive/en-us/wsh/htm/wsMthRun.asp
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/wsmthrun.asp

Returncode = WshShell.Run("SET 123=blahblah", 1, True)

Jeg får bare den angivne fil ikke fundet.

Fik det aldrig til at virke.

Har du en god idé til hvordan opretter jeg gerne et nyt spørgsmål.

Jeg har samme problem og modtaget denne stump kode.

strUserVariable = "Variablename"
strUserValue = "SomeThing"

Set objShell = WScript.CreateObject("WScript.Shell")
Set colUsrEnvVars = objShell.Environment("USER")
colUsrEnvVars(strUserVariable) = strUserValue

Nu har jeg rodet lidt og fundet ud af at man kan lave en fil f.eks setenv.vbs med dette indhold

Set objArgs = WScript.Arguments
if objArgs.Count = 2 then
  strUserVariable = objArgs(0)
  strUserValue = objArgs(1)
  Set objShell = WScript.CreateObject("WScript.Shell")
  Set colUsrEnvVars = objShell.Environment("USER")
  colUsrEnvVars(strUserVariable) = strUserValue
end if

og så skrive: setenv snavn "Navn med blanke i"

Eneste problem er at det kun virker for nye cmd'er ikke den man kørte setenv i. Men pyt til det formål har man jo stadig set.