spell checking of web objects

[kriday]

I have written the following code to test the spell checking

Code:

Set M_Word = CreateObject("Word.Application") Dim Desc Set Desc=Description.Create Desc("micclass").Value = "Link" Set Total_Links=Browser("SomeName").Page("SomeName").ChildObjects(Desc) a =Total_Links.Count For i=0 to a-1 M_Word.WordBasic.filenew Link_Name=Total_Links(i).GetROProperty("name") M_Word.WordBasic.insert Link_Name If M_Word.ActiveDocument.Spellingerrors.count>0 then Reporter.ReportEvent micPass, "Spelling " , "Spelling Error: " & Link_Name End if M_Word.ActiveDocument.Close(False) next M_Word.quit Set M_Word=nothing

when I execute this Iam getting the following error

ActiveX component can't create object: 'Word.Application'

Line (1): "Set M_Word = CreateObject("Word.Application")".

I need help in this. Thanks in advance.[/quote]

[basanth27]

Do you have MS Word installed on the system?

[ssvali]

Your code is working fine when i executed.

As basanth told check whether MS word is installed on your machine

[Staff]

Please ensure to include your code between [code] tags while asking or replying to questions. I have done this for you for this time.