الاتصال بالاكسس مع باسوورد

هذا هو الكود الموجود لدي للإتصال بقاعدة البيانات :

<%
Dim conn
set conn = server.CreateObject("ADODB.CONNECTION")
conn.Mode = adModeReadWrite
conn.provider ="Microsoft.Jet.OLEDB.4.0"
conn.open(server.MapPath("database\customers.mdb"))
%>

قمت بإضافة كلمة سر لقاعدة بيانات الاكسس ، ولكن اردي معرفة ماذا يمكن ان اضيف من كود لاتمكن من الاتصال بقاعدة البيانات بعد عمل باسورد لها

مع خالص الشكر والامتنان