vbs puzzle

[BOAC]

W2000 Pro, this in the admin start-up folder, and it ran fine until around 2 weeks ago.

set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "{NUMLOCK}"

Now I get a vbs error message on boot saying

Line 1
Char 1
The specified procedure could not be found
Code 8007007F
Source (null)

Any help appreciated.:confused:

[ORAC]

Codecharge Support (http://support.codecharge.com/kb_article.asp?s_prod=2&kb_articlesPage=6&article_id=70)

[BOAC]

Thanks for quick reply, Orac. I had seen that item, but this problem seems to be simply not being able to run a vbs script - that item refers to Database problems?

Even on this first line

Set WshShell = WScript.CreateObject("WScript.Shell")

I get "Could not create object "WScipt.Shell" with the same Error Code, which seems a fairly basic error? I am holding back from going down the MDAC download route at the moment.

I am fairly new to 2000. What could be missing in my setup for running VBS?

EDIT: Oh! so simple! Somehow Wscript had 'uninstalled' itself and running 'Scripten.exe'..........has........cured it :*

Appreciate the help.

[ORAC]

Could be a security issue. See here (http://armbrustconsulting.com/forums/viewtopic.php?t=13) (25th June).

or:

"Looks like there is a problem with you Windows Scripting Host installation. You could download latest WSH from Microsoft - but first might be worth trying to re-register the wshom.ocx module ...
try the following command from "DOS" command line ...(first move to the directory containing the wshom.ocx file then .."regsvr32 wshom.ocx"