Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Who have the sample code using MS Agent?
Message
From
23/11/1998 00:12:23
 
 
To
20/11/1998 11:20:09
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00140345
Message ID:
00160397
Views:
27
>>>>I try to use MS Agent ActiveX Control in VFP! What should I do?
>>>>Any sample code! Thank you!
>>>
>>>Here's the code, once the controls are on the form.
>>>
>>>
>>>*****
>>>Thisform.Agent1.Characters.load("Genie", "genie.acs")
>>>Thisform.Agent1.Characters.load("Merlin", "Merlin.acs")
>>>
>>>Genie = Thisform.Agent1.Characters("Genie")
>>>Merlin = Thisform.Agent1.Characters("Merlin")
>>>
>>>Genie.Get("Animation", "Annouce, AnnouceReturn, Pleased, PleasedReturn")
>>>Merlin.Get("Animation", "Confused, ConfusedReturn, Sad, SadReturn")
>>>
>>>Genie.MoveTo(100,100)
>>>Genie.Show
>>>
>>>Merlin.MoveTo(300,100)
>>>Merlin.Show
>>>
>>>Genie.Play("Annouce")
>>>GenieRequest = Genie.Speak(" Why did the chicken cross the road?")
>>>
>>>Merlin.Wait(GenieRequest)
>>>Merlin.Play("Confused")
>>>MerlinRequest = Merlin.Speak("I don't know. Why did the chicken cross the road?")
>>>
>>>Genie.Wait(MerlinRequest)
>>>Genie.Play("Pleased")
>>>GenieRequest = Genie.Speak("To get to the other side.")
>>>
>>>Merlin.Wait(GenieRequest)
>>>Merlin.Play("Sad")
>>>MerlinRequest = Merlin.Speak("I never should of asked.")
>>>
>>>********** End ***
>>
>>
>>
>>One thing I forgot.
>>
>>Place the MS Agent Control within an OLE Container and name the Agent Control Agent1.
>>>
>>>Code Originally from Henry W. Petry IV
>>>
>>>
>>>Hope this helps
>
>
>I'm trying to do this also but I can't seem to find the OCX. I downloaded as much as I could find off Microsoft site but no ocx for VFP. Is the active x control MSAGENT.OCX and if so where can we get it??
>
>Thanks!!!

Look at the following URL. It is basically the stating point.

http://www.microsoft.com/msagent/agentdl.asp
Fred Lauckner

You know, it works on my computer. I don't know what your problem is.

.Net aint so bad.
Previous
Reply
Map
View

Click here to load this message in the networking platform