this is the code I have, am I missing something, because I'm able to open my db and the conditions for my report come up, but the actuall report isn't opening. This is code for opening a preview but when I try to open a normal report I get an exception thrown at me.
try
dim oAccess as access.application
oAccess=New Access.ApplicationClass
OAccess.OpencurrentDatabase(filepath:="C:\Databases\field repair Traver.mdb", exclusive:=true)
oAccess.DoCmd.openreport(reportname:="Fr Date Range total", View:=Access.AcView.acViewPreview)
catch ex as exception
messagebox.show(ex.message)
end try
try
dim oAccess as access.application
oAccess=New Access.ApplicationClass
OAccess.OpencurrentDatabase(filepath:="C:\Databases\field repair Traver.mdb", exclusive:=true)
oAccess.DoCmd.openreport(reportname:="Fr Date Range total", View:=Access.AcView.acViewPreview)
catch ex as exception
messagebox.show(ex.message)
end try