[WSH]Script foutje

[SuB-Gold]

code:

Option Explicit
Dim shell, env, enumVars, fso

shell = WScript.CreateObject("WScript.shell")

env = shell.Environment

WScript.Echo("Het laten zien van specifieke environment variabelen")
WScript.Echo("")
WScript.Echo("Pad=" + env("Pad"))
WScript.Echo("windir=" + env("windir"))

WScript.Echo("")
WScript.Echo("")
WScript.Echo("Het laten zien van alle environment variabelen")
WScript.Echo("")
enumVars = New fso.Enumerator(env)

While enumVars.atEnd do
     WScript.Echo(enumVars.item())
     enumVars.moveNext()

End

Hiermee ben ik dus ff bezig, wil even wat dingen uitproberen, maar loop steeds vast op deze foutmelding onder PrimalScript:
test.vbs(23, 1) Compilatiefout Microsoft VBScript: Instructie wordt verwacht

Iemand een idee welk dom iets ik over het hoofd zie, moet iets kleins zijn! end na de while zetten is het niet dus...

[ Voor 9% gewijzigd door SuB-Gold op 11-01-2004 18:41 ]

[Verwijderd]

Moet je niet Wend gebruiken i.p.v. End bij een while?

[SuB-Gold]

Heb ik net ook geprobeerd, op regel 22 gezet col 1, WEnd, maar zelfde melding, nu op regel 22 col 1.

[Verwijderd]

Okee, Geen Do na While dan

[SuB-Gold]

Ook niet... zonder en met WEnd werkt die dan niet

[Verwijderd]

Maar wel om een andere reden:

code:

Regel:  4
Teken:  1
Fout:   Deze eigenschap of methode wordt niet ondersteund door dit object
Code:   800A01B6
Bron:   Runtimefout Microsoft VBScript

[Verwijderd]

zal wel aan mij liggen hoor, maar is het niet een DO - while loop ?

code:

do
     WScript.Echo(enumVars.item())
     enumVars.moveNext()
While enumVars.atEnd

of vergis ik me weer eens gruwlijk met een andere taal ?

edit : zie net dat ie dan natuurlijk wel heel erg de mist in gaat met de telling

[ Voor 16% gewijzigd door Verwijderd op 11-01-2004 19:02 ]

[whoami]

Nouja, dit is gewoon een kwestie van de syntax reference eens te bekijken.

Kijk welke lijn de compilatie-error geeft, en ga na de syntax na van die lijn en/of de bovenstaande lijnen.