Try adding this line before line #9.
When you convert this to an MDE & run it, see which line it complains about.
Code:
Call MsgBox(Now())
set db = dbengine(0).opendatabase("c:\foo\bar\mydata.mdb")
Comment