Dim WshShell,keys
Set WshShell = WScript.CreateObject("WScript.Shell")
keys=wshshell.regread ("HKLM\software\microsoft\windows\currentversion\run\")
for each key in keys
wscript.echo key
next
总是报错如图:
哪儿不对呢?
[ Last edited by icyheart on 2007-9-12 at 05:11 PM ]
Set WshShell = WScript.CreateObject("WScript.Shell")
keys=wshshell.regread ("HKLM\software\microsoft\windows\currentversion\run\")
for each key in keys
wscript.echo key
next
总是报错如图:
哪儿不对呢?
[ Last edited by icyheart on 2007-9-12 at 05:11 PM ]
Crossings must be my teacher
Modest progress can be
Modest progress can be
