dim msaccess as Aplication

maria
30 de Abril del 2003
Lo que hago en mi programa es acceder a un informe hecho ya en access de la siguiente forma:
Dim msaccess as Aplication
Set msaccess = New Access.Application
msaccess.OpenCurrentDatabase ("c:MARIAdb1.mdb")

Pero me resulta muy lento!!!Se puede hacer de otra forma para que no sea tan lento???
Otra pregunta:en el informe de access tengo una variable fecha en la clausula WHERE.Como hago para darle el valor que quiero desde VisualBasic???Porque al ejecutarlo aparece una ventanita de access pidiendome el valor de la variable fecha.
GRACIAS.