16-08-22, 02:21 AM
(11-07-22, 09:50 AM)dr.programming كتب : السلام عليكم
أكثر ما يجعلك تلعن مهنة البرمجة و تفكر فى البعد عنها : أن تجد كود فى موقع كبير و محترم بجد و يمتلأ ما شاء الله بمرمجين كبار .. ثم تستخدم الكود فلا يعمل و تظل تعالج فيه لساعات و لا يعمل !!!!!!!!!!!!
ما أطلب هو شئ بسيط : عندى حقل ترقيم تلقائى و بع مفتاح أساسى . و كما تعلمون عند اضافة 3 سجلات مثلا به سيتم وضع أرقامهم 1 2 3 .. و عند الحذف للسجلات و ادخال سجلات أخرى ستصبح أرقامها 4 5 6 .
السؤال :
كيف يصبح أرقام السجلات بعد الحذف 1 2 3 أى ببساطة اعادة الترقيم التلقائى مرة أخرى من رقم 1
و أرجوكم ثم أرجوكم بلاش الكود الموجود هنا بالمنتدى لأنى دعوت الى الله عز وجل أن يسامح من وضعه الله يسامحه .. كود فاااااااااااااااااااااااااااشل و لا يعمل و أتحدى من وضعه . الله يسامحه ليومين أعانى بسببه
شوف ياغالي اذا كانت الجداول مترابطه مع بعضها البعض وهناك بيانات سابقه فصعب جدا تنفيذ طلبك و ليس من الصحيح ان يتم اعادة ترقيمها تلقائيا ولكن بعطيك مثال بسيط بدون كود
استخدام جملة اكبر قيمة max بواسطه جملة استعلام
مثال : تم حذف الحقل رقم ٤ و ٥ و ٦
فمن الاجدر والصحيح عند اضافة حقل جديد لا يكون رقمه ٧
لازم يكون الرقم ٤ كون في حقول سابقه اخذت رقم ١ و ٢ و ٣
Select max(id) from table
سيتم الاحتفاظ بقيمة الاستعلام في متغير
تقوم باضافة قيمة واحد للمتغير
Dim maxvalue as integer
Maxvalue = نتيجة الاستعلام + val(1)
طبعا هذا الامر علشان تعالج الحقول الجايه التي سيتم اضافتها بعد عملية الحذف
وحسب فهمي لموضوعك.
يتم عمل استعلام لعرض عدد الحقول في الجدول
ثم جملة تحديث حقل id حسب ترقيم السطر.
بجملة for او while
من رقم الحقل ١ حتى نهاية الحقول.
شرط التنفيذ يجب ان يكون الحقل رقم وليس ترقيم تلقائي.
اعتذر منك ومن الجميع فأنا استخدم المنتدى من الجوال وما اقدر اكتب الردود بالطريقة الصحيحه والواضحه.
ان شاء الله يكون الحل واضح حسب ماتم طرحه.. اذا اصتصعبت الامر بأذن الله برفق لك كود لاحقا ..
