Daniel Opland wrote:
I get a type-mismatch error on the "Set conMax = "... line.

Do you have a reference to another type library etc with a Connection
object e.g. ADO? Try explicitly prefacing your declaration using the
correct library name e.g.

Dim conMax As DAO.Connection

Jamie.

--