+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : محتاج كود خاص ببرنامج المخازن (/showthread.php?tid=25053)
الصفحات:
1
2
محتاج كود خاص ببرنامج المخازن - hatem555 - 22-05-18
انا باعمل برنامج ادارة المخازن
وعايز اعمل داتا جريد فيو يظهر فيها الاصناف اللي عدت الحد الادني
يعني كل صنف له حد ادني للكمية بتاعته مختلف عن باقي الاصناف
عايز كود لعرض الاصناف اللي عدت الحد الادني
مع العلم اني باستخدم داتا بيز اكسس
ولكم جزيل الشكر
RE: محتاج كود خاص ببرنامج المخازن - elgokr - 22-05-18
كل ما ستحتاج فقط هو تكرار نس الاكواد الذى تستخدمها لعرض الداتا
لكن فى كود الاستعلام مثالكود :
SELECT * FROM tabaleستقوم بجعله بهذا الطريقة
كود :
SELECT * FROM tabale WHERE sanf > 140حيث ان sanf هو اسم العمود خاص بالحد
و 140 هى الحد المطلوب اذا تجاوزها الرقم ده يعرض فى الاستعلام
تمنياتى لك التوفيق
RE: محتاج كود خاص ببرنامج المخازن - hatem555 - 23-05-18
(22-05-18, 07:51 PM)elgokr كتب :كل ما ستحتاج فقط هو تكرار نس الاكواد الذى تستخدمها لعرض الداتالكن فى كود الاستعلام مثال
كود :
SELECT * FROM tabale
ستقوم بجعله بهذا الطريقة
كود :
SELECT * FROM tabale WHERE sanf > 140
حيث ان sanf هو اسم العمود خاص بالحدو 140 هى الحد المطلوب اذا تجاوزها الرقم ده يعرض فى الاستعلام
تمنياتى لك التوفيق
تسلم علي الرد والاهتمام
لكن ده مش قصدي
الكود ده لو الحد الادني ثابت
انما انا عندي اصناف كتير وكل صنف له حد ادني مختلف عن الاخر
عايز استعراض الاصناف اللي عدت الحد الادني حسب كل صنف
ارجو تكون فهمت القصد
RE: محتاج كود خاص ببرنامج المخازن - elgokr - 23-05-18
ارفق مشروع مصغر للجزء الاستفسار
حتى يتم توضيح كيفية استخدام لكود بناءاً على ترتيبات مشروعك
ما قمت بوضع بالرد السابق هو كا فكرة ويمكن استخدام الكود حسب الاستعلام عن كل منتج
ولكل منتج الحد الادنى اذا كان ثابت ويكتب يدوى او من خلال مدخل فى قاعدة البيانت او البرنامج
فطريقة تصميمك وطرية التعامل لمشروعك هو ما يحدد الكود الفعلى للاستخدم وليس كا مثال
تحياتى لك
وتمنياتى لك التوفيق
RE: محتاج كود خاص ببرنامج المخازن - hatem555 - 23-05-18
المشروع في المرفقات
RE: محتاج كود خاص ببرنامج المخازن - elgokr - 23-05-18
كل ما ستحتاج اليه فتح قاعدة البيانات وانشاء جدول
وليكن باسم lowsanf او كما تشاء
ويكون المحتوى بالداخل وليكن كما فى الصورة
ويتم تعبئة محتوى الجدول بالاصناف وقيمة الحد الادنى
لكل صنف كما فى الصورة بدون تكرار الاصناف
من ثم قم بتطبيق كود الاستعلام التالى
كود :
SELECT * FROM lowsanf INNER JOIN items ON (lowsanf.Sanf = items.[اسم الصنف]) AND (lowsanf.LowSanf <= items.lowitems);يمكنك اختبار الكود بعد انشاء كما سبق خلال ملف الاكسس
وسيكون الناتج كما يلى
وبكده انت بتتحكم لكل صنف الحد الادنى قيمة محددة
من خلال الجدول الذى تم تكوينه
اتمنى ان يكون الشرح مبسط
تحياتى لك
وتمنياتى لك التوفيق
قم بتطبيق بالنهاية كود الاستعلام بعد الانتهء من قاعدة البيانات
خلال السطر التالى فى زر الحد الادنيكود :
Dim DataAdapter1 As New OleDbDataAdapter("SELECT * FROM items WHERE lowitems > 10", Conn)ليصبح
كود :
Dim DataAdapter1 As New OleDbDataAdapter("SELECT * FROM lowsanf INNER JOIN items ON (lowsanf.Sanf = items.[اسم الصنف]) AND (lowsanf.LowSanf <= items.lowitems)", Conn)تحياتى لك
وتمنياتى لك التوفيق
لمحو اعمدة خاصة الجدول الذى تم انشائه
فقط فى كود الاستعلام حول * الى items.*
تحياتى
RE: محتاج كود خاص ببرنامج المخازن - hatem555 - 23-05-18
(23-05-18, 04:58 AM)elgokr كتب :كل ما ستحتاج اليه فتح قاعدة البيانات وانشاء جدولوليكن باسم lowsanf او كما تشاءويكون المحتوى بالداخل وليكن كما فى الصورة
ويتم تعبئة محتوى الجدول بالاصناف وقيمة الحد الادنىلكل صنف كما فى الصورة بدون تكرار الاصناف
من ثم قم بتطبيق كود الاستعلام التالى
كود :
SELECT * FROM lowsanf INNER JOIN items ON (lowsanf.Sanf = items.[اسم الصنف]) AND (lowsanf.LowSanf <= items.lowitems);
يمكنك اختبار الكود بعد انشاء كما سبق خلال ملف الاكسسوسيكون الناتج كما يلى
وبكده انت بتتحكم لكل صنف الحد الادنى قيمة محددةمن خلال الجدول الذى تم تكوينه
اتمنى ان يكون الشرح مبسطتحياتى لكوتمنياتى لك التوفيق
قم بتطبيق بالنهاية كود الاستعلام بعد الانتهء من قاعدة البياناتخلال السطر التالى فى زر الحد الادني
كود :
Dim DataAdapter1 As New OleDbDataAdapter("SELECT * FROM items WHERE lowitems > 10", Conn)
ليصبح
كود :
Dim DataAdapter1 As New OleDbDataAdapter("SELECT * FROM lowsanf INNER JOIN items ON (lowsanf.Sanf = items.[اسم الصنف]) AND (lowsanf.LowSanf <= items.lowitems)", Conn)
تحياتى لكوتمنياتى لك التوفيق
لمحو اعمدة خاصة الجدول الذى تم انشائهفقط فى كود الاستعلام حول * الى items.*
تحياتى
الكود ده مش ظبط معايا وحاولت اقرا عن الكود ده ومش وصلت لحاجة
ارجو مثال للتوضيح او تعديل المثال الموجود بالمرفقات
الكود اللي حاولت اشتغل بيه
PHP كود :
Dim DataAdapter1 As New OleDbDataAdapter("SELECT * FROM items INNER join items ON (items.quant = items.lowitems)", Conn)
RE: محتاج كود خاص ببرنامج المخازن - elgokr - 23-05-18
طبق اخى الفاضل الشرح كما فى الرد السابق
لتمام انشاء جدول مخصص للحد الادنى لكل صنف
مع تطبيق كود الاستعلام
من السهل عمل ما قمت شرحه واتمام رفع المشروع بالرد
ولكن ماذا انت الان تستفاد عندما عند تكرار نفس الفكرة او تشابه الامر معك
فى مشروع اخر هل تلجاء الى اضافة موضوع والاستسار مجدداً
الهدف من المساعدة هنا هو تبسيط الامر وانك تتعلم بنفس الوقت
لا مشكلة من التكرار ووجود الاخطاء الاهم بساطة وفهم الامر بالنهاية
عند متابعة التعليق السابق لى وعمل ما تم كتابته فى الرد
هتوضح الفكرة معك وستتمكن من تنفيذ المطلوب
متابع معك حتى تنتهي من الامر
تحياتى لك
وتمنياتى لك التوفيق
RE: محتاج كود خاص ببرنامج المخازن - hatem555 - 23-05-18
(23-05-18, 05:55 PM)elgokr كتب :طبق اخى الفاضل الشرح كما فى الرد السابقلتمام انشاء جدول مخصص للحد الادنى لكل صنفمع تطبيق كود الاستعلام
من السهل عمل ما قمت شرحه واتمام رفع المشروع بالردولكن ماذا انت الان تستفاد عندما عند تكرار نفس الفكرة او تشابه الامر معكفى مشروع اخر هل تلجاء الى اضافة موضوع والاستسار مجدداً
الهدف من المساعدة هنا هو تبسيط الامر وانك تتعلم بنفس الوقتلا مشكلة من التكرار ووجود الاخطاء الاهم بساطة وفهم الامر بالنهاية
عند متابعة التعليق السابق لى وعمل ما تم كتابته فى الردهتوضح الفكرة معك وستتمكن من تنفيذ المطلوب
متابع معك حتى تنتهي من الامر
تحياتى لكوتمنياتى لك التوفيق
انا فعلا حاولت اطبق الرد السابق ولكن دون جدوي
وهحاول ابحث عن شرح للكود عشان افهمه
وشكرا للاهتمام
RE: محتاج كود خاص ببرنامج المخازن - elgokr - 23-05-18
(23-05-18, 09:59 PM)hatem555 كتب : انا فعلا حاولت اطبق الرد السابق ولكن دون جدوي
وهحاول ابحث عن شرح للكود عشان افهمه
وشكرا للاهتمام
ما الذى توقف معك او ما يظهر معك بعد تطبيق الكود
ارفق المشروع بعد تطبيق الشرح
حتى يتم توضيح اين الخطاء
تحياتى لك
ارفق المشروع بعد تطبيق الشرح
حتى يتم توضيح اين الخطاء
تحياتى لك