Error - The requested member of the collection does not exist

hi,

I executed the below VB Script to compare two word documents.

Code:

---


option explicit

dim sPath1,sPath2,objArgs,word,destination

Set objArgs = WScript.Arguments
sPath1=objArgs(0)
sPath2=objArgs(1)

    set word = createobject("Word.Application")
    word.visible=1
   
    ' Open the first document
    set destination = word.Documents.Open(sPath2)
    ' Hide it
    destination.Windows(1).Visible=0
   
    ' Compare to the second document
    destination.Compare(sPath1)
   
    ' Show the comparison result
    word.ActiveDocument.Windows(1).Visible = 1
   
    ' Mark the comparison document as saved to prevent the annoying
    ' "Save as" dialog from appearing.
    word.ActiveDocument.Saved = 1
   
    ' Close the first document
    destination.Close

---

I'm getting the below Error on executing this script.

'The requested member of the collection does not exist'

You shouldnt declare all variables on a single line as it makes them all Variants which is a heavy weight object and usually overkill.

Looks lik ethe only potential collections where it could error is in the .Open or .Compare methods as the file path may be incorrect.