Print To File Without Dialog

[Sabine]

Hello!

I am using MS Project 2003.
I have written a VBA macro which does the following for all resources in one
project plan:
1.) Creates a temporary project plan for one resource
2.) Print this temporary project plan as file with the following code:
psfile = sPsPath + sMail + ".ps"
If Dir(psfile, vbNormal) <> "" Then Kill (psfile)
SendKeys (psfile + "~")
FilePrint FromDate:=dFrom, ToDate:=dTo

This program works only when the workstation is not locked.
When the workstation is locked the SendKeys command does not work!

Does anyone know a solution without using SendKeys?

Thanks!

Sabine