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

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


اريد العمود الرقم هو باسم xid 
ونوع القاعدة اكسس
اريد ان يتم فحص العمود حتى يتم توليد رقم عشوائى جديد غير مكرر وشكرا مقدما لكم 
رمضان كريم
تفضل اخي الكود ، ويجد مشروع كامل بالاسفل :

جملة الاتصال :
كود :
OleDbConnection Conn = new OleDbConnection(@"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\DB.accdb");

ميثود لعمل رقم عشوائي :
PHP كود :
public int RandomNumber(int minint max)
 
       {
 
           int rand_num;
 
           Random random = new Random();
 
           rand_num random.Next(minmax);
 
           // check if number existes in database
 
           while (cheque_Exists(rand_num) == true)
 
           {
 
               rand_numrandom.Next(minmax);
 
           }
 
           return rand_num;
 
       

فانكشن لارجاع اذا ما كان الرقم مسجل او لا :

PHP كود :
// check if number already exists in database
 
       private bool cheque_Exists(int num)
 
       {
 
           // check for connection 
 
           if (Conn.State == ConnectionState.Closed)
 
           {
 
               Conn.Open();
 
           }
 
           OleDbCommand cmd = new OleDbCommand("Select count(*) from Table1 where xid= @xid"Conn);
 
           cmd.Parameters.AddWithValue("@xid"num);
 
           var result cmd.ExecuteScalar();
 
           Conn.Close();
 
           return Convert.ToBoolean(result);
 
       
شكرا لك شكرا جزيلا
وعليكم السلام ورحمة الله وبركاته ،،


بسطر واحد ممكن تنفيذ الفكرة :

كود :
TextBox1.Text = DateTime.Now.ToFileTime.ToString
شكرا جدا  على الموضوع الاكثر من رائع










_______________________________________________
التسامح الحق لا يستلزم نسيان الماضي بالكامل..

سينما كلوب
ايجي بست
شاهد فور يو

سيرا اون لاين


مشاهدة فيلم
(25-05-19, 02:51 AM)حريف برمجة كتب : [ -> ]وعليكم السلام ورحمة الله وبركاته ،،


بسطر واحد ممكن تنفيذ الفكرة :

كود :
TextBox1.Text = DateTime.Now.ToFileTime.ToString

كود السى شارب
txtsir.Text = DateTime.Now.ToString();

انت حوت ما خطرت ببالى كنت عايز اعملها مفتاح اساسى للتعديل والحذف وانت جبتها وحش