fnajar
Oct 1st, 2002, 03:49 PM
Hi. I found this code in a web site in microsoft, and tells how to create
an instance of ms-agent.
Dim AgentControl As New Agent
Dim robby As Object
AgentControl.Connected = True ' necessary for IE3
AgentControl.Characters.Load "Robby",
"http://agent.microsoft.com/agent2/chars/robby/robby.acf"
Set robby = AgentControl.Characters("Robby")
robby.LanguageID = &H409 ' needed under some conditions (English)
robby.Get "State", "Showing, Speaking"
robby.Get "Animation", "Greet, GreetReturn"
robby.Show
robby.Get "State", "Hiding"
robby.Play "Greet"
robby.Speak "Hello, World!"
robby.Hide
But, I want to create the agent with late binding, like this:
Dim AgentControl As Object
Dim robby As Object
set AgentControl = CreateObject("xxxx") . . . etc
But, i cant find the name of the library or i can't create the object.
How i do that ?
Thanks !!!
an instance of ms-agent.
Dim AgentControl As New Agent
Dim robby As Object
AgentControl.Connected = True ' necessary for IE3
AgentControl.Characters.Load "Robby",
"http://agent.microsoft.com/agent2/chars/robby/robby.acf"
Set robby = AgentControl.Characters("Robby")
robby.LanguageID = &H409 ' needed under some conditions (English)
robby.Get "State", "Showing, Speaking"
robby.Get "Animation", "Greet, GreetReturn"
robby.Show
robby.Get "State", "Hiding"
robby.Play "Greet"
robby.Speak "Hello, World!"
robby.Hide
But, I want to create the agent with late binding, like this:
Dim AgentControl As Object
Dim robby As Object
set AgentControl = CreateObject("xxxx") . . . etc
But, i cant find the name of the library or i can't create the object.
How i do that ?
Thanks !!!