Open the report.
Set session("oRpt"

= session("oApp"

.OpenReport(path & reportname, 1)
set crtable1 = session("oRpt"

.Database.Tables.Item(1)
For an Access database use this syntax:
There may be another way to do it, but this works.
* I could ONLY get this method to work if the report was initially created with the ODBC datasource being a DSN of the same name on the development machine, that it was being set to on the production box at runtime.
Replace the database name with the full path to the database file.
crtable1.setlogoninfo "DSNname","d:\directory\database.mdb","Login","Password"
The "Login" and "Password" parameters are optional.