تسجيل الدخول

مشاهدة النسخة كاملة : ربط برنامج الصيدلية مع قاعدة البيانات


السـ عطف ـنابل
21-04-2005, 06:00 PM
سلام عليكم ورحمة الله وبركاته...
(هذا الموضوع ساعدني فيه عضو من المنتدى لكن ماني عارفة طريقة الربط مع قاعدة البيانات
ولا طريقة كتابة الأكواد) ممكن تساعدوني

بصراحة أنا حأتعبكم معاي شوية طبعاً عندي مشروع التخرج عبارة عن تصميم برنامج(إدارة صيدلية)

محتوياته:-------
*اسم الدواء
*نوعه : مسكن الم , كريم بشرة , علاج كحة , مكمل غذائي , فيتامين .. الخ
*مخصص للاعمار التالية .. اطفال , رجال , نساء , البالغين .. الكل .. من سن كذا حتى سن كذا .. الخ
*تاريخ الانتاج
*تاريخ الانتهاء
*تاريخ التخزين: وهو تاريخ وصوله للصيدلية
*الشركة المصنعة
*الكمية: 24 حبة , 5 درازن .. الخ
*السعر
*ملاحظات
تذكري ان ترتيبي عدد الاعمدة لتناسب عدد الفيلدز اي سيكون عدد الاعمدة 10
هكذا ستظهر جميع محتويات الداتا بيز في الجدول
بعدها ستضيفين فورم اخرى لتكون الشاشة التي ندخل بواسطتها البيانات وتحتوي على ازرار و تكست بوكس بعدد الفيلدز في الجدول .. اي 10 تكست بوكس

ونظيف اداة data مرة اخرى ونربطها بالداتا بيز و نربط التكست بوكس جميعها بها على ان ياخذ كل تكست بوكس فيلد معين

نظيف الازرار بحيث يعطينا امر الادخال و الحفظ في الداتا بيز

الشاشة الاخيرة التي سنظيفها ستكون للبحث
يمكنك اختيار عملية بحث واحدة و اعدة عمليات
مثل..
سيسمح البحث عن الدواء من خلال اسمه, او تاريخ التخزين
يمكنك وضع اداة option putton وعددهما اثنان ليختار المستخدم عن اي فئة سيحث
وستكون هناك تكست بوكس واحدة و زر بحث
وستظهر نتيجة البحث في الشاشة الاولى التي تحتوي على msflexgrid


بعد ذلك نظيف الاداة Data ونربطها مع قاعدة البيانات
ونظيف اداة MsFlexGrid ونربطها مع الاداة Data
(طبعاً فكرة البرنامج انه الصيدلي مثلاً يعمل بحث عن دواء معين,وبإمكانه يضيف ادويه جديدة للسته
إللي عنده ,وإنه كمان يختار اسم المرض وتطلع له لسته بالأدوية المتوفرة)

(هذا الموضوع ساعدني فيه عضو من المنتدى لكن ماني عارفة طريقة الربط مع قاعدة البيانات
ولا طريقة كتابة الأكواد) ممكن تساعدوني

وآآآآآآآآآآسفة عالإطالة

أختكم:-
السـ عطف ـنابل
بصمة الهكر
21-04-2005, 09:36 PM
السلام عليكم
اختي الكريمة ضعي الكود واي طريقة ترغبين بها للربط
هناك عدت طرق مثل داتا وادو ورادو وغيرها
سلامي
TeamFlex
24-04-2005, 04:55 AM
صممت البرنامج لكن بشكل بسيط
لم اضع له ديزاين خاص واتركه لك و لذوقك

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

راجعيه عدل و شدي حيلك واتمنى لك التوفيق
السـ عطف ـنابل
29-04-2005, 06:07 PM
بصمة الهكر: مشكور أخوي على مرورك وبصراحة انا ما اعرف اي شي عن ربط قواعد البيانات
عشان كدا ما ادري ايش اقلك


TeamFlex:مشكور أخوي وما قصرت بصراحة أول ما كتبتلي فكرة البرنامج حسبتك نسيت موضوعي
لكن والله فيك الخير وآسفة إدا كان تعبتك معاي ومرة فكرة البرنامج حلوة وانا عرضتها على المشرفة وعجبتها الله يجزاك الف خير ويسعدك ويوفقك يارب
T H E-L O O R D
13-05-2005, 12:59 PM
طيب اخوي كيف ربطت البرنامج مع القاعدة
TeamFlex
13-05-2005, 11:42 PM
يا هلا عطف السنابل.. ابد ما سويت شي و مشكورة .. وبالتوفيق
---------------------

اخوي the loord
فيه طريقتين لربط الداتا بيز بالفيجول بيسك

الطريقة الاولى :- من خلال استخدام المساعد (wizred)..

ضيف ادات data للبرنامج ومن شاشة الخصائص (proprties) روح على "Database name" ضيف الداتا بيز

بهدها انتقل الة "record source" و ضيف اسم الجدول المطلوب

عيب هالطريقة انك مثلا اذا كانت الداتا بيز على الدرايف (D) نزلت البرنامج على جهاز ثاني وكان فيه الدرايف اسمه (C) ما راح يشتغل البرنامج لانه ناسخ رابط الداتا بيز وما يتغير.
----------------

الطريقة الثانية:- من خلال كتابة كود من سطرين فقط في صفحة الكود .

استخدم هالكود وغالبا يوضع في الفورم لود.. احيانا انا استخدم تايمر.. واحيانا كمبو بوكس اذا عندي اكثر من داتا بيز او اكثر من جدول


Data1.DatabaseName = App.Path & "/XXX.mdb"
Data1.RecordSource = "YYY"

السطر الاول راح يبحث عن الداتا بيز .. ضع مكان XXX اسم الداتا بيز
السطر الثاني راح يبحث عن الجدول .. ضع مكان YYY اسم الجدول

وبالتوفيق :>
T H E-L O O R D
14-05-2005, 03:31 PM
مشكور اخوي على المعلومة