السلام عليكم
عندي قاعدة بيانات اكسس فيها أسماء الموظفين وغي ذلك.
المطلوب هو ملف VB SCRIPT يقوم بعملية قراءة أسماء كل المستخدمين من ملف الأكسس وإضافتها داخل ال ACTIVE DIRECTORY لآنو الكود اللي عندي مش شغال.
المشكلة هي عدم القدرة علي الآتصال بقاعدة البيانات.
الرجاء المساعدة..
وهادا هو الكود اللي مش زابط معي
كود الربط
Dim SQL,DBConn
'هنا المشكلة
Set DBConn=Server.CreateObject("ADODB.Connection")
DBConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\TST.mdb;Persist Security Info=False"
DBConn.Open DBConn.ConnectionString
DBConn.CursorLocation = adUseClient
SQL = "select * from tst"
RCSet.Open SQL, DBConn, 3, 3ملحوظة
*.VBS طبعا لازم حفظ الملف بامتداد