الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

أخوكم محتاجكم

بدأه ksa_prog في 1 يونيو 2010 · 2 رد · 395 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

يا اخوان عند برنامج طريقة الربط العادية على الجهاز هذي سهلة لكن اذا بغيت البرنامج يشتغل على شبكة

كيفية ربطة بالشبكة كيف سوف أضع الكود الخاص بالاتصال :

طريقة الاتصال

Public Sub ConnectionDatabase()

On Error GoTo 1

If db.State = adStateOpen Then _

db.Close

db.CursorLocation = adUseClient

db.Provider = "Microsoft.JET.OLEDB.4.0;"

db.Open App.Path & "/Store.mdb"

Exit Sub

1

MsgBox Err.Description, vbCritical, "Phone Sale"

End Sub

وشكرا لكم

#2

يعني يا اخواني هل أكتب عنوان الشبكة ip adress بعد المسار انظر التالي :

db.CursorLocation = adUseClient

db.Provider = "Microsoft.JET.OLEDB.4.0;"

db.Open App.Path & "// /Store.mdb

يعني في المكان الفارغ

اشكركم كثير ا على القراءة

#3

السلام عليكم

اذا كنت تضع البرنامج على جهاز يستخدم نظام xp فلاتحتاج الى اي شيء فقط

ضع البرنامج على الجهاز الرئيسي ومعة قاعدة البيانات داخل ملف مشاركة وعلى الاجهزة الاخرى

ضع اختصار ملف التشغيل على جهاز المستخدم

اما اذا اردت وضع فقط قاعدة البيانات على الجهاز الرئيسي وتنزيل البرنامج بالكامل على كل جهاز

فهنا تحتاج وضع مسار قاعدة البيانات واقصد اسم الجهاز الرئيسي (هناك امثلة في المنتدى راجعها)

وانصحك بالانتقال الى قاعدة بيانات sqlserver فهي اقوى وافضل واسرع

بالتوفيق

مواضيع مشابهة