سلام

راهش خيلي ساده تر از اين حرفاست
تو خاصيت Connect كنترل ديتا عبارت زير رو اضافه كنيد

pwd=...


مثلا

Data1.Connect=Access;pwd=12345

يا

Data1.Connect=Access2000;pwd=123456