قمت بصميم وبرمجة برنامج إداري ومالي متكامل يتكون من 35 جدول و 50 نموذج و 60 تقرير والمشكلة أن عند تزيل الجداول فقط على الملقم الرئيسي أعاني من بطئ شديد في تداول البيانات بين المستخدمين وقاعدة البيانات على الملقم ، لاحظت أن حجم البيانات كبير نوعاً ما لذلك قمت بترحيل البيانات بشكل سنوي إلي جداول خارجية ونجحت الفكرة في تخفيف البطء لكن مازالت عملية التداول بطيئة ، لذاك أحاول مناداة البيانات بطريقة Connect من خلال ADO ولكن مع السف حتى الآن لم أهتدي إلي الطريقة السليمة أرجو من أهل من أهل المعرفة والخبرة في مجال ADO توجيه إلي الطرق السليم أو من خلال مثال مبسط لربط برنامج أكسس بقاعدة بيانات أكسس من خلال ADO.
ربط برنامج أكسس بقاعدة بيانات أكسس خارجية
مغلق
السلام عليكم ورحمة الله وبركاته
نفرض ان الجداول موجودة في قاعدة بيانت اسمها PAYROLL
وموجودة على الخادم بمجلد مشارك مع صلاحيات انت تحددها
اعمل على جهاز الزبون (MAP NETWORK DRIVE )
وسمه حرف K
الان من جهاز الزبون كيف تصل للبينات عل جهاز الخادم بطريقة ADO
ضع في الوحدة النمطية الاتي في مقطع DECLRATION
مع ملاحظة انه توجد كلمة سر مخزنة على الفاعدة هي GOOD
Const PASS As String = ";pwd=GOOD"
Public WS As Workspace
Public DBT As Database
ثم من داخل اجراء استخدم الامر التي
Set WS = DBEngine.Workspaces(0)
Set DBT = WS.OpenDatabase("k:\PAYROLL.mdb", False, False, PASS)
ثم عرف مجموعة سجلات واستخدمها
DIM RSDB As Recordset
Set RSDB = DBT.OpenRecordset("DEGREE_BOUNS")
مازن طبش
هذا الموضوع مغلق.