عندي برنامج وله قاعدة بيانات بالاكسس
وأريد أن أضع البرنامج في سيرفر أو جهاز واحد واجعل اربعة أجهزة تعمل علية
المشكلة هي في مسار قاعدة البيانات
حيث يتم عمل البرنامج بعدما تم عمل الشيرنك او المشاركة على الأيقونة البرنامج ولكن
لا يعرف أين قاعدة البيانات المخزنة على أحد الاجهزة فقط
فكيف أعمل ذلك ..
تم تعديل هذه المشاركة بواسطة HnHn في 12 أكتوبر 2004 في 10:12
سجل ايميلك هنا
ليصلك كل ما هو مفيد في عالم البرمجةاخي كل ما تحتاجه هو قاعدة البيانات ان تكون علي سيرفر او جهاز ، ثم تقوم بعمل مشاركة للمجلد الموجوده فيه قاعدة البيانات , وليكن مسارهما هكذا .
\\server\mydb\mydb.mdb
وقم بتنزيل برنامجك علي الاجهزة الاخرى ، واعطيه المسار المطلوب للاتصال بقاعدة البيانات . (افضل شيئ اجعل برنامجك يأخذ مسار قاعدةالبيانات من ملف INI) , حتي لو تغير مكان قاعدة البيانات لا تضطر للتعديل علي البرنامج .
تحياتى لك .
تم تعديل هذه المشاركة بواسطة prof_1982 في 12 أكتوبر 2004 في 11:03
الإنسان الذي يقول بأنه لا يمكن عمل شيء يجب ألا يعيق مطلقاً الإنسان الذي يقوم بعمل ذلك الشيء.
إن تخطئ فأنت إنسان ... أما أن تلوم جهازك الكمبيوتر على خطأك فهذا أكثر إنسانية.
كلامك صحيح وأنا أعرف ذلك ولكن كيف أجعل البرنامج يأخذ المسار من التيكس أو INI أرجو ان تكتب لي المطلوب في التيكس وأن أغير فقط اسم قاعدة البيانات وشكرا لتفاعلك معي
سجل ايميلك هنا
ليصلك كل ما هو مفيد في عالم البرمجةهذه هي الطريقة
'Module
Public Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long
Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Public INIFile , INIValue as String
'---------------------------------------------------
'Form Load Or Any Place
INIFile = "c:\myini.ini" 'File Name
INIValue = Space(128)
Res1 = GetPrivateProfileString("Section", "Key", 0, INIValue, 128, INIFile)
INIValue = Trim(CStr(INIValue))حيث ان الـSection هي القسم العام في الملف الذي يحتوي مفاتيح .
والـKey هو المفتاح الذي يحمل قيمة ، ويكون داخل القسم .
تم تعديل هذه المشاركة بواسطة prof_1982 في 13 أكتوبر 2004 في 13:59
الإنسان الذي يقول بأنه لا يمكن عمل شيء يجب ألا يعيق مطلقاً الإنسان الذي يقوم بعمل ذلك الشيء.
إن تخطئ فأنت إنسان ... أما أن تلوم جهازك الكمبيوتر على خطأك فهذا أكثر إنسانية.
عندي استفساران
الاول
- هل يمكن أن تضع لي الطريقة الصحيحة لكتابة مسار قاعدة بيانات محمية
بكلمو مرور داخل الملف الذي تفضلت بذكره وترفقها لي ...
الثاني
- ما هو المفتاح أو ماذا يرمز له
وهل تقصد Section الشفرة لتي تكون مكتوبة بينه داخل الملف
زي كذا
[Section] db.CursorLocation = adUseClient db.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db.mdb;Jet OLEDB:Database Password=xxxx;adAsyncConnect"
ارجو الافادة
تم تعديل هذه المشاركة بواسطة HnHn في 14 أكتوبر 2004 في 13:15
سجل ايميلك هنا
ليصلك كل ما هو مفيد في عالم البرمجةإذا كيف يمكنني جعل البرنامج يجد قاعدة البيانات حتي ولو تغير مكانها ؟
اتمنى اخي remono84 أن نجد من يوضح المسألة اكثر لأهميتها
سجل ايميلك هنا
ليصلك كل ما هو مفيد في عالم البرمجةهل تستطيع اخي prof_1982 وضع مثال صغير لتوضيح فكرة الربط
حيث أن طريقتك جدا رائعه ولكني فشلت في تطبيقها
سجل ايميلك هنا
ليصلك كل ما هو مفيد في عالم البرمجةهذا الموضوع مغلق.
