View Single Post
Old 11-26-2004   #1 (permalink)
buhhmann
Registered Member
 
Join Date: Nov 2004
Posts: 3
Unhappy WScript.CreateObject Error :(

Hi there!
I'm trying to enable Microsoft Agent support for our loved NetStumbler.

I get an error in the following function at the line marked with '!?!:

Function Activate(agent)
Path = "%WINDIR%\MSAGENT\CHARS\" & agent & ".ACS"
Set AgentControl = WScript.CreateObject("Agent.Control.1", "event_") '!?!
If IsObject(AgentControl) Then AgentControl.Connected = True
Set wshshell = CreateObject("WScript.Shell")
Path = wshshell.ExpandEnvironmentStrings(Path)
AgentControl.Characters.Load agent, Path
Set Activate = AgentControl.Characters(agent)
End Function

It says " Object needed : 'WScript' ", ok, I googled a bit and found some threads where a similar problem seemed to disappear by using this:
Set AgentControl = CreateObject("Agent.Control.1", "event_")
When I try to use it, it says kind of " The Remoteservercomputer is not existent or not available. "

Anyone knows how to solve that misery?
Btw: In both cases the error is reported to occour in the line marked with '!?! at the beginning by the "set", if that does matter anyhow.
buhhmann is offline   Reply With Quote