تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] ترقيم تسلسلي في بيئة تعدد المستخدمين
#1
 ارجو من اخواتي الكرام مساعدتي في كتابة كود ترقيم تسلسلي بزيادة واحد كل مرة عند فتح النموذج مع العلم ان عدد المستخدمين اكثر من 100 مستخدم دالة MAX غير مجدية في حال كان اكثر من مستخدم يتشاركون البيانات هل هناك طريقة احترافية مجربة تفي بالغرض؟ ولكم جزيل الشكر
الرد
تم الشكر بواسطة:
#2
السلام عليكم...
في نفس جدول المستخدمين انشئ حقل باسم (مرات_الدخول) واجعل عند كتابة اسم المستخدم في نص الدخول يظهر عدد مرات الدخول والزيادة عليها (1)كل مرة الم تصلك راسلني لارسل لك مثال.
الرد
تم الشكر بواسطة: ahmadpal
#3
استخدم ترقيم تلقائي من خصائص حقل الجدول
بسم الله الرحمن الرحيم > "اللَّهُ نُورُ السَّمَاوَاتِ وَالْأَرْضِ ۚ مَثَلُ نُورِهِ كَمِشْكَاةٍ فِيهَا مِصْبَاحٌ ۖ الْمِصْبَاحُ فِي زُجَاجَةٍ ۖ الزُّجَاجَةُ كَأَنَّهَا كَوْكَبٌ دُرِّيٌّ يُوقَدُ مِن شَجَرَةٍ مُّبَارَكَةٍ زَيْتُونَةٍ لَّا شَرْقِيَّةٍ وَلَا غَرْبِيَّةٍ يَكَادُ زَيْتُهَا يُضِيءُ وَلَوْ لَمْ تَمْسَسْهُ نَارٌ ۚ نُّورٌ عَلَىٰ نُورٍ ۗ يَهْدِي اللَّهُ لِنُورِهِ مَن يَشَاءُ ۚ وَيَضْرِبُ اللَّهُ الْأَمْثَالَ لِلنَّاسِ ۗ وَاللَّهُ بِكُلِّ شَيْءٍ عَلِيمٌ" < صدق الله العظيم
الرد
#4
اجعل خيار الترقيم التلقائي في زر الحفظ وقبل ان تتم عملية الحفظ يجب ان يحصل على max ثم حفظ وبهذه الطريقة يتم حل المشكلة بعون الله
 فورم تسجيل الدخول
www.tiny.cc/y80k6y
 بلوك لمستخدم على البرنامج
الرد
#5
(16-05-19, 09:56 PM)ahmadpal كتب : اجعل خيار الترقيم التلقائي في زر الحفظ وقبل ان تتم عملية الحفظ يجب ان يحصل على max ثم حفظ وبهذه الطريقة يتم حل المشكلة بعون الله

الطريقة هذه ما تنفع مع اذا مستخدمين التطبيق اكثر من مستخدم لأنه سوف يحصل خطأ فادح ....

الحل السليم حقل ترقيم تلقائي وعند حفظ السجل جلب رقم الترقيم التلقائي لنفس السجل المحفوظ واستخدامه في العمليات الأخرى .

مثال :

كود :
Dim ID As Integer

Using conn As New OleDbConnection(connect)
 Using cmd As New SqlCommand("insert Into Categories (CategoryName) Values (@CategoryName)", conn)
   cmd.Parameters.AddWithValue("@CategoryName", Category.Text)
   conn.Open()
   cmd.ExecuteNonquery()
   cmd.Commandtext="select @@Identity"
   ID = cmd.ExecuteScalar()
   conn.close()
 End Using
End Using

لاحظ cmd.Commandtext = "select @@Identity"
سيكون رقم السجل في المتغير (ID)
بسم الله الرحمن الرحيم > "اللَّهُ نُورُ السَّمَاوَاتِ وَالْأَرْضِ ۚ مَثَلُ نُورِهِ كَمِشْكَاةٍ فِيهَا مِصْبَاحٌ ۖ الْمِصْبَاحُ فِي زُجَاجَةٍ ۖ الزُّجَاجَةُ كَأَنَّهَا كَوْكَبٌ دُرِّيٌّ يُوقَدُ مِن شَجَرَةٍ مُّبَارَكَةٍ زَيْتُونَةٍ لَّا شَرْقِيَّةٍ وَلَا غَرْبِيَّةٍ يَكَادُ زَيْتُهَا يُضِيءُ وَلَوْ لَمْ تَمْسَسْهُ نَارٌ ۚ نُّورٌ عَلَىٰ نُورٍ ۗ يَهْدِي اللَّهُ لِنُورِهِ مَن يَشَاءُ ۚ وَيَضْرِبُ اللَّهُ الْأَمْثَالَ لِلنَّاسِ ۗ وَاللَّهُ بِكُلِّ شَيْءٍ عَلِيمٌ" < صدق الله العظيم
الرد
#6
بدلاً لكثرة الاكواد والمتاهة يفضل استخدام الترقيم التلقائي
ولمن يقول اريد استخدام الترقيم اليدوي
حتى اذا تم عمل حذف يتم اعادة ترقيمة عن الاضافة

فسؤالى لك
ماذا بعد اضافة 100 قيم تم حذف احدهم وليكن رقم 66
فهل عند اضافة 101 سيتم ترقيمة 101 ام انه 66 ؟؟؟

لان بطبيعي سيكون 101 لكونك تقوم بجلب اخر رقم مضاف
واذا تم جلب بالعدد فهنا سيكون 100 مكرر مرتين

تحياتى لكم جميعاً
وتمنياتى لكم التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

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


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد
تم الشكر بواسطة: ahmadpal , حريف برمجة , ابراهيم ايبو , alshandodi


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Rainbow [سؤال] كود لحساب عدد المستخدمين للبرنامج محمد مسافر 5 237 07-03-19, 11:37 AM
آخر رد: محمد مسافر
  [VB.NET] التعامل مع تعدد الداتا جرد فيو هاني المومني 1 133 06-03-19, 09:43 PM
آخر رد: ابراهيم ايبو
  اريد ترقيم الداتا جريد فيو سمير جمال 6 356 15-11-18, 01:32 PM
آخر رد: عبدالله الدوسري
  كيف يمكنني إعداد ترقيم تلقائي ويتجدد الترقيم في كل سنة mram3242 11 889 30-10-18, 01:34 AM
آخر رد: DOX.1
  ترقيم ذكي DOX.1 2 243 29-10-18, 06:33 PM
آخر رد: elgokr
  تعدد لون النص في TextBox او RichBox YousefOkasha 10 714 20-08-18, 05:30 AM
آخر رد: elgokr
Music [VB.NET] صلاحيات المستخدمين محمد بوقزاحة 3 414 18-07-18, 09:20 PM
آخر رد: asemshahen5
Star صلاحيه مستخدمين | إدارة المستخدمين YousefOkasha 7 652 16-07-18, 12:11 AM
آخر رد: elgokr
Star برنامج دعم المستخدمين | خدمة عملاء YousefOkasha 0 7,817 12-07-18, 02:04 PM
آخر رد: YousefOkasha
  [VB.NET] تعدد لغات برنامجك YousefOkasha 4 419 30-06-18, 11:56 AM
آخر رد: mmali127

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


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم