Qiu terminator, te voy ayudar socio...te envio esto...
Imprimir un informe de Access desde Vb:
'Agregar una referencia en el proyecto a:
MS Access
Dim MSAccess as Access.Application
Private Sub CMDREPORT_click()
Set MSAccess = New Access.Application
MSAccess.OpenCurrentDatabase("C:\Nombre_Carpeta\Base_de_Datos.mdb")
'Si la bd esta protegida con contraseña el unico metod que conozco es:
'Enviarle la contraseña de esta forma: SendKeys"contraseña{ENTER}"
MSAccess.Docmd.OpenReport "Nombre_Reporte",acviewNormal
MSaccess.CloseCurrentDatabase
SetMSAccess = nothing
End Sub
Chauuu socio y suerte con visual que es mi favorito..