تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيفية معرفة رقم تم حذفه وسط ارقام متسلسلة
#1
يوجد لدي جدول يحتوي على ارقام متسلسلة لو يوجد رقم تم حذفه وسط هذا التسلسل هل يوجد كود لمعرفته
الرد }}}
تم الشكر بواسطة:
#2
(20-08-17, 02:31 PM)Amir_alzubidy كتب : السلام عليكم ورحمة الله و بركاته
يمكنك الاستعانة بجدول آخر بحيث يكون فيه رقم التسلسل المحذوف وتاريخ عملية الحذف
بهذه الحالة نستطيع الاستعلام عن جمكيع الارقام المحذوفة وفق تاريخ آخر عملية على سبيل المثال
والله اعلم

لا يوجد سوى جدول واحد
الرد }}}
تم الشكر بواسطة: أبو نوره
#3
اهلا تناسيم



فيه طرقه للتبليغ اسم المستخدم والوقت و ( الحدث اللي قام به ) وترسل إليك على الإيميل
الرد }}}
تم الشكر بواسطة: تناسيم , أبو نوره , أبو نوره
#4
(20-08-17, 02:35 PM)سعود الشامان كتب : اهلا تناسيم



فيه طرقه للتبليغ اسم المستخدم والوقت و ( الحدث اللي قام به ) وترسل إليك على الإيميل

انا اريد فقط معرفة الرقم المحذوف اسرع بدلا من مراجعة الارقام كلها واستخراج الرقم المحذوف
الرد }}}
تم الشكر بواسطة: أبو نوره
#5
(20-08-17, 02:46 PM)khodor1985 كتب : السلام عليكم أخي العزيز ورحمة الله وبركاته
الطريقة الأولى :
ترحيل السجل قبل الحذف إلى جدول آخر.
الطريقة الثانية :
إذا كنت تستخدم قاعدة بيانات من نوع سيكوال فيمكنك التعامل مع Triggers.

لقد وضعنا لكم الحل البسيط وهو معتمد ولا داعي فيه لمراجعة الأرقام فقط سوف تقوم بإنشاء استعلام يستدعي السجلات المحذوفة من الجدول الثاني، أما إذا أردت الطريقة المعقدة فإليك التالي :
نقوم بتخزين جميع الأرقام التسلسلية فيList ونقوم بإنشاء List أخرى في المقابل تحتوي على نفس عدد الأرقام ونجري مقارنة بينهما والرقم الغير المطابق سوف يظهر في النتيجة

اي جدول ثاني جدول واحد فقط؟
كيفية عمل استعلام يستدعي السجلات المحذوفة من الجدول؟
كيفية عمل مقارنة بين الtwo list لو اتبعت الطريقة الثانية وهل هي باستخدام الايكسيل؟
شكرا جزيلا
الرد }}}
تم الشكر بواسطة: أبو نوره
#6
وجهة نظري ان لا تتيح الحذف الجذري لعامة المستخدمين وانما فقط اخفاء .
والاداري النهائي هو من يقرر الحذف الفعلي.
يعني ببساطة يكون لديك عمود باسم مثلا show وقيمته الافتراضية 1 اي نعم وعند الحذف الجزئي تجعل القيمة 0 .
وعند الاستعلام لدى كافة المستخدمين where show=1 ولدى الاداري نكتب where show=0 ليرى قراره المناسب.
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
الرد }}}
#7
(20-08-17, 05:37 PM)khodor1985 كتب : لا حول ولا قوة إلا بالله العلي العظيم
سوف أتكلم باللغة العربية، أنا عندي جدول بعنوان Person وهذا الجدول يحتوي على ثلاثة حقول :
- Id   رقم تسلسلي
- FirstName
- LastName
لإضافة البيانات من المشروع إلى الجدول في قاعدة البيانات نستخدم جملة السيكوال :
PHP كود :
Insert Into Person (Fname,LnameValues(@Fname,@Lname

لحذف سجل من الجدول في قاعدة البيانات من خلال المشروع نضع جملة سيكوال :
PHP كود :
Delete From Person Where Id = @Id 

لكن قبل أن ننفذ عملية الحذف لننشئ جدول ثاني في قاعدة البيانات نفسها سواء كانت من نوع Access أو SQL :
ولنسمي الجدول DeletedRecords
وسيضم هذا الجدول 4 حقول :
- Id رقم تسلسلي
- PersonId وهو السجل الذي سيتم حذفه من الجدول Person
- FirstName
- LastName

عند زر الحذف في المشروع نضع الكود التالي :
نضع جملة الـ Insert أولا ثم جملة Delete ثانيا، بمعنى آخر نضع إجراء إدخال السجل الذي سيتم حذفه إلى الجدول DeletedRecords ثم يليه جملة الحذف من الجدول Person.

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

انا ما قدرتش اوصل لحضرتك قصدي انا حذفت صف بالفعل من جدول وهذا الصف له رقم تسلسلي اريد معرفة رقم هذا الصف على العلم انه لا يوجد سوى هذا الجدول الذي يحوي البيانات
وحضرتك افادتني انني ممكن اعمل انسخ لعمود الارقام المتسلسلة متهيألي حضرتك تقصد عن طريق الايكسيل وانشئ عمود آخر بنفس التسلسل واعمل تطابق للاثنين وساتمكن خلالها من استخراج الرقم المحذوف فانا بسأل كيفية عمل تطابق للعمودين
وشكرا واسفة على الاطالة
الرد }}}
تم الشكر بواسطة: أبو نوره
#8
مرحبا اخى تناسيم

ممكن تكون على خطوتين
الاولى تستعلم عن جميع ارقام الرقم التسلسلي وتضعهم في مصفوفه
التانيه تلف على كل المصفوفه وتستخرج الرقم الغير موجود
مثل هذا الكود
PHP كود :
الخطوه الاولى
Dim a 
As New OleDataAdapter("SELECT [id] FROM [tbl]"cn)
dim t As New Datatable
a
.Fill(t)
Dim id() As Integer=(From x as DataRow In t.Rows Select Cint(x.Item(0))).toArray

الخطوه التانيه
dim b 
as new stringbuilder
For i=1 To id.Last
    If Not id
.Contains(iThen b.append(i)
Next

Dim s 
As string=String.join(", ",b)

MsgBox(s

كتبت الكود بالمفكره واعتذر اذا كانت هناك اخطاء
الرد }}}
#9
السلام عليكم ورحمة الله نفس الموضوع تم حله من قبل بمشاركة لى ومرفق على المشاركة التالية لعلها تفيد
http://vb4arb.com/vb/showthread.php?tid=18125
الرد }}}
تم الشكر بواسطة: أبو نوره


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية منع ظهور الأخطاء من إعدادات البيسيك mmaalmesry 2 851 29-08-25, 10:30 AM
آخر رد: mmaalmesry
  كيفية جلب أسماء الأعمدة بجدول من جداول sql heem1986 2 748 17-08-25, 09:15 PM
آخر رد: heem1986
  كيفية حفظ إعدادات البرنامج بحيث لا تتغير أحمد إبراهيم سعد 4 3,004 06-08-25, 06:34 PM
آخر رد: Taha Okla
  مساعدة في كيفية ترحيل البيانات من داتا قريدفيو إلى داتا قريدفيو في فيجوال بيسك ahmedfa71 13 2,246 09-07-25, 11:24 PM
آخر رد: أبو خالد الشكري
  كيفية احتساب الفرق بين تاريخين بناء على عدد معين مصمم هاوي 2 554 15-01-25, 02:02 PM
آخر رد: مصمم هاوي
  كيفية التعامل مع inputbox في فيجوال ستوديو أسامة حسين 4 3,507 14-01-25, 02:04 AM
آخر رد: أبو خالد الشكري
  كيفية معرفة الجهاز رئيسي ام فرعي المتألق9 1 400 13-11-24, 06:41 PM
آخر رد: justforit
  معرفة عدد صفوف الجريد فيو بشرط معين modymody300894 4 658 12-11-24, 02:22 PM
آخر رد: salamandal
  كيفية معرفة تاريخ انشاء ملف وحدفه المتألق9 2 514 07-11-24, 08:54 AM
آخر رد: F.H.M
  كيفية جلب بيانات بشرط الأستبعاد heem1986 1 334 28-08-24, 10:06 PM
آخر رد: justforit

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


يقوم بقرائة الموضوع: