关于ACCESS中报表打印的问题

[我了你个去]

在VB中使用一个按键打印ACCESS中的报表.先把数据上传到上位机中,然后再打印,但使用Dim MSAccess As Access.Application

Private sub Command1_Click()

　　Set MSAccess=NEW Access.Application

　　MSAccess.OpenCurrentDatabase(App.Path & " ovelty.mdb")



　　MSAccess.DoCmd.OpenReport "rptEmployess",acViewNormal

　　MSAccess.CloseCurrentDatabase

　　Set MSAccess=Nothing

end Sub

注：acViewNormal告知Access打开该报表并立即打印。

　　 这种方法有个缺点，就是运行环境中必须装有MS Access。
MSAccess.OpenCurrentDatabase会打开数据库,点打开才会打印,如果让它不打开数据库直接打印呢?求解