Olá, td blz??
Ainda tá dando o erro?? Mesmo após ter separado "Data" de "Source" ??
bom, talvez seja "pwd".... eu sei q usava assim no DAO mas no ADO eu acho q é assim:
CNN.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & App.Path &"SeuBD.MDB;Jet " & _
"OLEDB:Database Password=senha;"
Tenta q qq problema posta novamente
t+