تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيفية عمل ازرار مأخوذة او مربوطة مع قاعدة البيانات
#1
السلام عليكم ورحمة الله وبركاته ,,,

اخواني الكرام هل يوجد لدى احدكم مثال بسيط مثل برنامج المطاعم مثلاً
يظهر المواد  او المنتجات المضافة الى قاعدة البيانات كواجهة فيها ازرار 
عندما نضيف اي منتج الى قاعدة البيانات فانه يقوم باضافة زر عليه اسم المنتج الى صفحة المبيعات 
 كالصورة المبينة بالاسفل 
وشكرا جزيلا عل جهودكم


الملفات المرفقة صورة/صور
   
الرد
تم الشكر بواسطة:
#2
تابع هذه الدورة ممكن تستفيد منها
https://www.youtube.com/watch?v=6QyDajVR...thi6E8lFGH
إسرائيل إلى زوال ...  وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة: Amir_Alzubidy , sendbad100 , Ahmed_Mansoor , hannileo
#3
هذا مثال علي انشاء اداة زر اثناء التشغيل
قم بالتعديل عليه كما يناسب مشروعك
كود :
Dim WithEvents Cmd1 As CommandButton
'
Private Sub Form_Load()
 Set Cmd1 = Controls.Add("vb.commandbutton", "Cmd1")
 Cmd1.Width = 2000
 Cmd1.Top = Me.Height / 2 - Cmd1.Height / 2 - 100
 Cmd1.Left = Me.Width / 2 - Cmd1.Width / 2 - 100
 Cmd1.Caption = "Dynamic Button"
 Cmd1.Visible = True
End Sub
الرد
تم الشكر بواسطة: Amir_Alzubidy , sendbad100 , Ahmed_Mansoor , Ahmed_Mansoor , hannileo
#4
السلام عليكم و رحمة الله و بركاته 

بالاضافة لما قدمه الاخوة الاحبة 
صنعت لك هذا المثال لتستفيد منه و ليستفيد منه البقية 
لكن هناك ملاحظة بسيطة حول فكرة الـ [Fast Menu] 
يمكن استخدامها بشكل اساسي ببرامج المطاعم او المنشآت التي يكون عدد منتجاتها قليل 
لكن لا يعتمد عليها بشكل اساسي ببرامج السوبر ماركت او المؤسسات التي تتعدى منتجاتها الـ 1000 صنف
 الا اذا كانت للمنتجات الاكثر طلب 
على العموم يمكنك تعديل هذا المثال حسب ما تقتضيه الحاجة
بالتوفيق 

.rar   BTN_PAGE.rar (الحجم : 13.57 ك ب / التحميلات : 11)
 اللهم اغفر لي و لوالديّ و للمؤمنين و المؤمنات 
و المسلمين و المسلمات الأحياء منهم و الأموات 
سبحان الله وبحمده Heart سبحان الله العظيم
الرد
#5
وعليكم السلام ورحمة الله وبركاته ,,,

استاذا عامر اسمح لي قبل انك اشكرك على عملك هذا المثال الرائع والبسيط كالعادة 

اقدم لك تحياتي وارو انك قد عدت عن فكرة الاعتزال لاننا بصراحة بحاجة لمواضيعك 

والله الصفحة بدونكم ليش لها معنا 
اساتذتنا الكرام 

والان اسمح لي ان اشكرك على كل شيئ و زادك الله علماً  ورفع قدرك  ونفع بك 

وبخصوص المثال الرائع هل يمكن من بعد اذنك ان نفترض ان item هي عبارة عن منتج له سعر ومواصفات خاصة 

وعندما نقوم بالضغط عليه فانه يضيفة على listview  اي الى فاتورة مبيعات حتى عند الضغط على منيج اخر يضيفه ايضاً للقائمة مثل برنامج مبيعات المطاعم بالضبط 

والامر الاخر هل يمكن اخفاء الازرار التي ليست مربوطة بمنتج اي ليس لها اي قيمة 




بارك الله بك وبجهودك
الرد
تم الشكر بواسطة: sendbad100 , Ahmed_Mansoor
#6
اهلا بك اخي الحبيب 
شكراً جزيلاً لك 
كنت عازماً على ألا اعود لكنني عدت 
و لكن هذه المرة ربما سيكون الغياب محتوم بلا عودة 
(13-01-19, 09:17 AM)hannileo كتب : * وعندما نقوم بالضغط عليه فانه يضيفة على listview  اي الى فاتورة مبيعات حتى عند الضغط على منتج  اخر يضيفه ايضاً للقائمة مثل برنامج مبيعات المطاعم بالضبط 
* والامر الاخر هل يمكن اخفاء الازرار التي ليست مربوطة بمنتج اي ليس لها اي قيمة 
يا ليتها كانت بتلك السهولة اخي الحبيب 

اليك الخطوات قبل ان يتم ادراج السجل الى جدول فاتورة المبيعات 
عند الضغط على الايتم من من خلال المنيو فسيكون هناك جملة استعلام تقوم بما يلي : 
هل الصنف الذي تم اختياره له حد ادنى من السعر ؟ 
له  كميات ؟ 
هل هو بالوزن ام بالكمية ؟
يخضع للضريبة ام لا و ما نسبة القيمة المضافة ؟ 
ما رصيده الحالي ؟ 
كان رصيده قد وصل الى حد الطلب بالفعل ام لا ؟ 
و و و ... 
هذه امور و غيرها يجب ان تأخذها بعين الاعتبار قبل ان يتم ادراج الصنف الى الفاتورة 
اما بالنسبة للنقطة الثانية كتبت هناك بالمثال كود بسيط وو اضح يمكنك الاستفادة منه و تعديله كيفما تشاء 
تعديل المرفق
.rar   BTN_PAGE_1.rar (الحجم : 14.6 ك ب / التحميلات : 5)
اليك ودي و امتناني
 اللهم اغفر لي و لوالديّ و للمؤمنين و المؤمنات 
و المسلمين و المسلمات الأحياء منهم و الأموات 
سبحان الله وبحمده Heart سبحان الله العظيم
الرد
تم الشكر بواسطة: حامد محمد , Ahmed_Mansoor , Ahmed_Mansoor
#7
اليك الخطوات قبل ان يتم ادراج السجل الى جدول فاتورة المبيعات 
عند الضغط على الايتم من من خلال المنيو فسيكون هناك جملة استعلام تقوم بما يلي : 
هل الصنف الذي تم اختياره له حد ادنى من السعر ؟ 
له  كميات ؟ 
هل هو بالوزن ام بالكمية ؟
يخضع للضريبة ام لا و ما نسبة القيمة المضافة ؟ 
ما رصيده الحالي ؟ 
كان رصيده قد وصل الى حد الطلب بالفعل ام لا ؟ 
و و و ... 
هذه امور و غيرها يجب ان تأخذها بعين الاعتبار قبل ان يتم ادراج الصنف الى الفاتورة 




السلام عليكم ورحمة الله وبركاته ,,,

استاذا عامر لابأس كان مثال جميل جدا ً جداً وارجوا ن يستفيد جميع الاخوة منه لانه مهم 

انا بالحقيقة اعمل على برنامج وقمت باضافة المنتج عن طريق البحث بادخال الباركود ثم يظره لي معلومات المنتج مع السعر والكمية 


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



كود :
   ListView2.ListItems.Add , , Text5.Text
   ListView2.ListItems(ListView2.ListItems.Count).SubItems(1) = Text1.Text
   ListView2.ListItems(ListView2.ListItems.Count).SubItems(2) = Text2.Text
   ListView2.ListItems(ListView2.ListItems.Count).SubItems(3) = Text3.Text
   ListView2.ListItems(ListView2.ListItems.Count).SubItems(4) = Format(Text4.Text, "###,###,###.00")
   ListView2.ListItems(ListView2.ListItems.Count).SubItems(5) = Val(Text5.Text) * Val(Text6.Text)
   ListView2.ListItems(ListView2.ListItems.Count).SubItems(6) = Text9.Text
   ListView2.ListItems(ListView2.ListItems.Count).SubItems(7) = ""


كود :
subtotal = ListView2.ListItems(ListView2.ListItems.Count).SubItems(5)
   
   Label10.Caption = Val(Label10.Caption) + Val(subtotal)



وانشالله سوف اقوم بارسال نسخة لك عندما انتهي منه قريبا انشالله 


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


بارك الله بك.... وجعلها في ميزان حسناتك
الرد
تم الشكر بواسطة: Ahmed_Mansoor


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال بخصوص النقط والفواصل العشرية وغيرها في قاعدة البيانات hannileo 3 173 24-01-19, 01:58 PM
آخر رد: عبدالله الصافي
  ترتيب البيانات tighrmte 2 132 12-01-19, 11:45 PM
آخر رد: tighrmte
  [Acces2003] ازاى اعمل قاعدة بيانات مشتركة ahmedhossam 4 2,418 25-12-18, 12:58 PM
آخر رد: aboezzat84
  [سؤال] كيفية تشغيل قاعدة بيانات برنامج VB6+Access على شبكة داخليه aboezzat84 2 259 25-12-18, 12:34 PM
آخر رد: aboezzat84
  مشكلة في تكرار البيانات عند الطباعة DATAREPORT دهشوش1 3 275 13-12-18, 05:03 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] كيفية الاتصال بقاعدة البيانات علي شبكة دون طلب اسم الجهاز وكلمة المرور kamalgadir 0 167 05-12-18, 05:58 PM
آخر رد: kamalgadir
  طباعة قيم مربعات نص غير مربوطة بقاعدة البيانات دهشوش1 4 243 30-11-18, 11:02 PM
آخر رد: دهشوش1
  [vb6.0] حل مشكلة حفظ الصورة في ملف وليس على قاعدة البياناتDataBase عبدالقادرعواد 3 353 26-11-18, 01:42 AM
آخر رد: عماد السيد
Question [vb6.0] كيف يتم إضهار الترقيم تلقائي المجود في قاعدة البيانات عند النقر على امر جديد ؟ Microformt 8 687 20-10-18, 09:54 PM
آخر رد: gonm64
  كيفية نسخ قاعدة بيانات جديدة وباسم في هذا المثال khezzani 5 283 15-10-18, 10:55 PM
آخر رد: سعداء

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم