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

الحل بإذن الله

مغلق
بدأه palstine في 4 ديسمبر 2002 · 5 رد · 611 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

هذا رد لموضوع مشكلة في السيريل

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

if not t.eof then

t.movelast

text1.text= t!id+1

فقط

جرب الكود واخبرني بالنتيجة

سلام

لتنزيل اخر البرامج المساعده للمبرمجين والبرامج بشكل عام

http://www.tahmeelnet.blogspot.com

#2

بسم الله الرحمن الرحيم

الأخ palstine إن أهم مشكلة في الكود الذي أوردته هي أنه لو أنشأنا سجلا جديدا و كان رقمه 95 مثلا ثم بعد ذلك و لسبب ما قمنا بحذف ستة سجلات مثلا فالسجل التالي الذي سوف يظهر هو السجل رقم 90 و هو أمر مربك و يرفضه أصحاب كل البرامج الجادة - الكبيرة - أو مدراء المحاسبة لأن السجلات 90 إلى 95 قد أنتجت ورقيا فعلا و عند إلغائها لا يتم التعامل بأثر رجعي بل يستمر العمل قدما قد يسبب الكثير من الشوائب بالذات في مرحلة تصفير قاعدة البيانات لاستخدامها للعام الجديد

و قد وجدت أنه من الواجب ذكره للتنبيه

و الله الموفق

#3

اشكر كل الاخوة على مشاركتهم

اذا تم تصميم الجدول (رقم السيريل) على انه رقم تلقائي (auto number) واذا كان الرقم الاخير مثلا 80 وتم بعدها حذف 5 سجلات فإن الارقام المخصصة للسجلات المحذوفة لا يتم حجزها مرة ثانية فإذا تم اضافة سجل جديد فإن رقمه يكون 81

وشكرا للجميع

لتنزيل اخر البرامج المساعده للمبرمجين والبرامج بشكل عام

http://www.tahmeelnet.blogspot.com

#4

السلام عليكم

نعم فالترقيم التلقائى يقوم باستكمال العد تسلسلياً دون النظر للسجلات المحذوفة

" وما توفيقى إلا بالله عليه توكلت وإليه أنيب "
-------------------------------------------------
قل : " لا حول ولا قوة إلا بالله "
-------------------------------------------------

#5

الاخوة الاعزاء

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

هناك مشكلة في عمل القيود اليومية حيث ان القيد يتكون من عدة سجلات في قاعدة البيانات فعلي سبيل المثال :

عندما اعمل قيد يتكون من عدة سجلات فان الحقل الذي يحتوي علي رقم القيد يكون متشابة طالما لم نتحول من قيد الي القيد الذي يليه وعليه عندما نتحول الي قيد جديد ارغب من البرنامج قراءة حقل رقم القيد في اخر سجل ثم يضيف الي (1) وللتوضيح :

رقم القيد اسم الحساب المدين اسم الحساب الدائن المبلغ المدين المبلغ الدائن البيان

---------------------------------------------------- ----------- ---------- ------- ----- -------

1 ----------اسم العميل الاول---------0 ----- 100 -------0 ------ الالالالالا

1-----------اسم العميل الثاني------ 0 -----200 --------0 -------الالالالالال

1---------- اسم العميل الثالث------- 0 ----300 --------0 -------الالالالالال

1------------------ 0 ------------المبيعات ----0------- 600 ------الالالالالال

2 -------------الصندوق------------- 0 -------500 --------0 ------الالالالالال

2----------------- 0 --------اسم العميل الاول -0 -------500 -------الالالالالا

وهكذا اريد البرنامج ان يقرا اخر رقم في القيد وليكن 2 ثم يكتب في التكست رقم 3 عن الضغط علي زر اضافة

وكما قلت في مشاركة سابقة ان طريقة text1.text = t!srl +1 لم تفلح حيث انه يصل الي رقم معين ثم يتكرر هذا الرقم كلما ضغطت زر اضافة

ارجو العون والمشورة

وشكرا

#6

بسم الله الرحمن الرحيم

الأخ palstine جزاك الله خيرا على التوضيح بخصوص السيريال و أود الطلب من كل الإخوة الذين يدرجون حلا أن يدرجوا حيثيات الحل كاملة

و الله الموفق

هذا الموضوع مغلق.

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