Help, quick.

How can i set the character ID:

Code:

---

Private Sub Form_Load()
Form1.Agent1.Characters("Wizard").Commands.Add "Exit", "Quit", "(Quit|Exit|End)", True, True

End Sub

---

it gives me an eroro sayind that the ID is not valid.Pelas help me, bacause i have to present my program with a least of ten function by monday.

numibesi

I got this code from an example project that I downloaded from microsoft:

Code:

---

Dim Genie As IAgentCtlCharacterEx
Const DATAPATH = "genie.acs"


Private Sub Form_Load()
    Agent1.Characters.Load "Genie", DATAPATH
    Set Genie = Agent1.Characters("Genie")
    Genie.LanguageID = &H409
    TextBox.Text = "Hello World!"
End Sub

Private Sub Button_Click()
    Genie.Show
    Genie.Speak TextBox.Text
    Genie.Hide
End Sub

---

also, dont forget to add the ms agent ocx.

It say´s "The system can´t find the given path", and the debug goes to:

Code:

---

Agent1.Characters.Load "Genie", DATAPATH

---

Any ideas.

numibesi

do you have the Genie Character? if not goto microsoft.com/msagent
and download the Genie (or other characters)

Make sure you are pointing to the full path where the character is stored.
e.g.

Code:

---

DATAPATH = "C:\windows\msagent\chars\genie.acs"
Agent1.Characters.Load "Genie", DATAPATH

---

I dont think that thats nessesary as long as its in the c:\windows\msagent\chars folder

Dimava:

You're right you don't need to specify it - I just tried it.
Perhaps he has them in a different folder or, as you mentioned earlier, hasn't downloaded it.