Shilps

I don't know for sure, but I would try

connstring = Array(Array("ODBC;DSN=MS Access Database;DBQ=" & datab &
";DefaultDir=" & direc & ";DriverId=25;" _
), Array("FIL=MS Access;MaxBufferSize=2048;PageTimeout=5;"))


connstring=Array(Array("ODBC;DSN=MS Access Database; DBQ=" & _
direc & "\" & datab & "Default....

Maybe you need the path in the DBQ argument


--
Dick Kusleika
MVP - Excel
Excel Blog - Daily Dose of Excel
www.dicks-blog.com