VB Merge Code

Now that I have this code working on my access 2003 version. Can anyone please show me how to alter it so that it run on a office 97 version?
I think it is something to do with 'WORD OBJ'?

Many thanks, Steve


Private Sub cboReport_Change()
On Error GoTo Err_Handler
If Nz(Len(Me.cboReport), 0) = 0 Then
MsgBox "You must select a correspondance letter"
Else
Dim WordObj As Word.Document
Dim strPathtoYourDocument
strPathtoYourDocument = "D:DataFrm_" & Me.cboReport & ".doc"
DoCmd.SetWarnings False
DoCmd.OpenQuery "qryMailMerge"
DoCmd.SetWarnings True
Set WordObj = GetObject(strPathtoYourDocument)
WordObj.MailMerge.Destination = wdSendToNewDocument
WordObj.MailMerge.Execute
WordObj.Close wdDoNotSaveChanges
WordObj.Application.Quit
Set WordObj = Nothing
Exit Sub
Err_Handler:
Beep
MsgBox "You have cancelled this operation."

Exit Sub
End If
End Sub