Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Msagent, how do I wait till its done
Message
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Miscellaneous
Thread ID:
00773778
Message ID:
00774217
Views:
11
nop, had to change it to the genie (only one i currently have)
LOCAL loform AS FORM

loForm = CREATEOBJECT("Form")
loForm.ADDOBJECT("agent", "oleControl", "Agent.Control.2")

*loForm.Agent.Characters.LOAD("Genie", "http://agent.microsoft.com/characters/genie/genie.acf")
loForm.Agent.Characters.LOAD("Genie", "c:\dev1\test\genie.acf")
*loForm.Agent.Characters.LOAD("Merlin", "Merlin.acs")
loForm.SHOW()

loRequest = loForm.Agent.Characters("Genie").SHOW()
DO WHILE INLIST(loRequest.STATUS, 2, 4)
	DOEVENTS
ENDDO
loRequest = loForm.Agent.Characters("Genie").Speak("Hello")
DO WHILE INLIST(loRequest.STATUS, 2, 4)
	DOEVENTS
ENDDO
same result - no character but the baloon
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform