Gerar relatorio Access via VB6

[Lademar 0]

Bom dia.A quem puder ajudar, gostaria de uma rotina onde eu pudesse gerar via codigo do VB6 relatorios já definidos em Access.Grato.Lademar da Silva Santoslademarr@hotmail.com

[Veber 0]

Dim msAccess As Access.ApplicationSet msAccess = New Access.ApplicationmsAccess.OpenCurrentDatabase "C:\teste.mdb"msAccess.Visible = TruemsAccess.DoCmd.OpenReport "rpt_teste", acViewPreview

[Lademar 0]

Boa tarde...Ao executar o aplicativo da o seguinte erro :Compile erroruser-defined type not definedNa seguinte linha de código:Private Sub CMDRelat_click()Dim MsAccess as Access.AplicationGrato, se puder me dar uma luz.Lademarlademarr@hotmail.com

[Veber 0]

tem que referenciar a DLL Microsoft Accessem PROJECT / REFERENCES