See he
http://support.microsoft.com/?id=257819

It seems you must first open the workbook in Excel before using DAO to query
it.

Tim


"tom taol" wrote in message
...

the following code is not working... because the password format....
please

Set db = OpenDatabase(ThisWorkbook.Path & "\" & szFileBase, 0, 0, "EXCEL
8.0;PWD=1111")

*** Sent via Developersdex http://www.developersdex.com ***