help with speak function

[dallasgfx]

i have a code

_TalkOBJ("salut cava bien")

Func _TalkOBJ($s_text)
    Local $o_speech
    $o_speech = ObjCreate("SAPI.SpVoice")
    $o_speech.Speak ($s_text)
    $o_speech.LanguageID  = Dec ("040a")
EndFunc;==>_TalkOBJ

this function for reading a text

the problem is when i turn on the code it speak english even i"m puting this line :

$o_speech.LanguageID = Dec ("040a")

it is for speaking with frensh

plz help me

Edited June 22, 2009 by dallasgfx