منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : محتاج كود خاص ببرنامج المخازن
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
انا باعمل برنامج ادارة المخازن
وعايز اعمل داتا جريد فيو يظهر فيها الاصناف اللي عدت الحد الادني
يعني كل صنف له حد ادني للكمية بتاعته مختلف عن باقي الاصناف
عايز كود لعرض الاصناف اللي عدت الحد الادني
مع العلم اني باستخدم داتا بيز اكسس
ولكم جزيل الشكر
كل ما ستحتاج فقط هو تكرار نس الاكواد الذى تستخدمها لعرض الداتا
لكن فى كود الاستعلام مثال
كود :
SELECT * FROM tabale

ستقوم بجعله بهذا الطريقة

كود :
SELECT * FROM tabale WHERE sanf > 140

حيث ان sanf هو اسم العمود خاص بالحد
و 140 هى الحد المطلوب اذا تجاوزها الرقم ده يعرض فى الاستعلام

تمنياتى لك التوفيق
(22-05-18, 07:51 PM)elgokr كتب : [ -> ]
كل ما ستحتاج فقط هو تكرار نس الاكواد الذى تستخدمها لعرض الداتا
لكن فى كود الاستعلام مثال
كود :
SELECT * FROM tabale

ستقوم بجعله بهذا الطريقة

كود :
SELECT * FROM tabale WHERE sanf > 140

حيث ان sanf هو اسم العمود خاص بالحد
و 140 هى الحد المطلوب اذا تجاوزها الرقم ده يعرض فى الاستعلام

تمنياتى لك التوفيق

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

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

فطريقة تصميمك وطرية التعامل لمشروعك هو ما يحدد الكود الفعلى للاستخدم وليس كا مثال

تحياتى لك
وتمنياتى لك التوفيق
المشروع في المرفقات
كل ما ستحتاج اليه فتح قاعدة البيانات وانشاء جدول 
وليكن باسم 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.*

تحياتى
(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
طبق اخى الفاضل الشرح كما فى الرد السابق
لتمام انشاء جدول مخصص للحد الادنى لكل صنف
مع تطبيق كود الاستعلام

من السهل عمل ما قمت شرحه واتمام رفع المشروع بالرد
ولكن ماذا انت الان تستفاد عندما عند تكرار نفس الفكرة او تشابه الامر معك
فى مشروع اخر هل تلجاء الى اضافة موضوع والاستسار مجدداً

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

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

متابع معك حتى تنتهي من الامر

تحياتى لك
وتمنياتى لك التوفيق
(23-05-18, 05:55 PM)elgokr كتب : [ -> ]
طبق اخى الفاضل الشرح كما فى الرد السابق
لتمام انشاء جدول مخصص للحد الادنى لكل صنف
مع تطبيق كود الاستعلام

من السهل عمل ما قمت شرحه واتمام رفع المشروع بالرد
ولكن ماذا انت الان تستفاد عندما عند تكرار نفس الفكرة او تشابه الامر معك
فى مشروع اخر هل تلجاء الى اضافة موضوع والاستسار مجدداً

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

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

متابع معك حتى تنتهي من الامر

تحياتى لك
وتمنياتى لك التوفيق

انا فعلا حاولت اطبق الرد السابق ولكن دون جدوي
وهحاول ابحث عن شرح للكود عشان افهمه
وشكرا للاهتمام
(23-05-18, 09:59 PM)hatem555 كتب : [ -> ]انا فعلا حاولت اطبق الرد السابق ولكن دون جدوي
وهحاول ابحث عن شرح للكود عشان افهمه
وشكرا للاهتمام


ما الذى توقف معك او ما يظهر معك بعد تطبيق الكود
ارفق المشروع بعد تطبيق الشرح

حتى يتم توضيح اين الخطاء

تحياتى لك
الصفحات : 1 2