I have a computer with Windows 2000, Office 2000, and Office 97. We have an access 97 database that performs a mail merge to MS Word. Prior to getting Windows 2000, the mail merge would open whatever version of Word that was last opened. However, since installing windows 2000, MS Word 2000 always opens. This causes a problem because Word 2000 looks for Access 2000 to do the mail merge. Most of the users of this database only have Windows NT and Office 97, so this is not a problem for them, only me. How do I get Word 97 to open as a default? The following is the code that I use to perform the mail merge:
Dim objWord As Word.Document
Set objWord = GetObject("Q:\90 REG\90 EMS\MMS\Databases\USTPage1.doc", "Word.Document"
objWord.Application.Visible = True
objWord.MailMerge.OpenDataSource _
Name:="Q:\90 REG\90 EMS\MMS\Databases\AST UST.mdb", _
LinktoSource:=True, _
Connection:="QUERY qryUSTReportPage1", _
SQLStatement:="Select * from [qryUSTReportPage1]"
objWord.MailMerge.Execute
Thanks,
Jeff
Dim objWord As Word.Document
Set objWord = GetObject("Q:\90 REG\90 EMS\MMS\Databases\USTPage1.doc", "Word.Document"
objWord.Application.Visible = True
objWord.MailMerge.OpenDataSource _
Name:="Q:\90 REG\90 EMS\MMS\Databases\AST UST.mdb", _
LinktoSource:=True, _
Connection:="QUERY qryUSTReportPage1", _
SQLStatement:="Select * from [qryUSTReportPage1]"
objWord.MailMerge.Execute
Thanks,
Jeff