[Wilhansen Li[_2_]]

I don't think there's really anyway so what I did was I opened both files and
invoked the compare operation like this:

Sub CompareAndMerge()
file1 = ActiveDocument.FullName
ActiveDocument.Close
file2 = ActiveDocument.FullName
ActiveDocument.Close
Documents.Open(file1).Merge (file2)
End Sub

So I just invoke it via command like like this:
WINWORD.exe mine.doc theirs.doc /mCompareAndMerge

Is this good enough? or are there better ways to do it?