Automation Error Run time error - 2147024894(80070002)

I am using VB 6.0 and when try to run the application the following error occured.
Please help me

Error : Run time error - 2147024894(80070002)
Automation Error
System cannot find the file specified.

My code is :

Private Sub Form_Load()

Set RC = New SpSharedRecoContext
Set myGrammar = RC.CreateGrammar
myGrammar.CmdLoadFromFile App.Path & "\sol.xml"

Error occured in Set RC = New spSharedRecoContext
i include the microsoft speech object library.
please help me
thanks

[536 byte] By [shamoel] at [2008-1-16]