AppActivate don't work

[A. op de Weegh]

Hi,
In a module within my Access 2000 database I use the following piece of code
to start Word.

Set objDocument = CreateObject("Word.Basic")
objDocument.AppMaximize "Microsoft Word", 1
AppActivate "Microsoft Word", 1

This code worked in Access 97, but now it crashes on the last line
(AppActivate). Access complaints about an invalid procedure call or invalid
argument.

Can anyone help me out?

Thanx,
Alex