I have a problem with a mail merge procedure I used to use with Access
'97.

We recently converted to Office XP (2002) and I now have an issue I am
unfamilliar with and have been unable to resolve.

I am trying to merge individual records into seperate mail merge word
docs.  In the past I linked my word files directly to the tables and
then simply changed the QueryString of the merge file for the
particular record I need to create a file for.

Here is a sample of the code I used in the past.

*******************************************************************
Private Sub Command0_Click()

   Dim w As Word.Application
   Dim m As MailMerge
   Dim mm As MailMergeDataSource
   Dim d As Word.Document
   Dim rst1 As dao.Recordset

   Set rst1 = CurrentDb.OpenRecordset("tblMergeData")

   Do Until rst1.EOF
       Set w = New Word.Application
       w.Visible = True
       Set d = w.Documents.Open("H:\My Documents\MyLetter.doc")
       Set m = d.MailMerge
       Set mm = d.MailMerge.DataSource

       'I Get the error
       '[ Run Time Error '5852':
       'Requested object is not available ]
       'on the next line.  This code was not a problem in Office '97

       mm.QueryString = "SELECT * FROM tblMergeData WHERE MergeF1 = '"
& rst1!myfield & "'"

       m.Execute
       Set mm = Nothing
       Set m = Nothing
       d.Close wdDoNotSaveChanges
       Set d = w.Documents("Form Letters1")
       d.SaveAs ("H:\My Documents\MyLetter" & rst1!Myfield1 & ".doc")
       d.Close
       w.Quit
       Set w = Nothing
       rst1.MoveNext
   Loop

End Sub

***************************************************************

Please note, I do realise I could change the source of my mail merge
file to a query and just change the SQL of my Query, however I have
several documents that use this method and would like to preserve the
process if at all possible.

I appreciate any thoughts.

Mike

This has been cross posted from: comp.databases.ms-access