تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
الكود لا يستدعى الارقام الا الاقل من 10
#1
السلام عليم

لو سمحت
الكود لاستدعاء اعلى قمية فى الجدول
ولكنه لا يعمل اذا كانت القيمة اعلى من رقم 10
اى انه ان كانت القمية اقل من 10 يعمل بشكل جيد

اما ان كانت القيمة اعلى من 10 لا يعمل الكود اطلاقا لا اعلم لماذا




كود :
Public Function Max_number_invoic_tbpl()
       Dim Number As Integer

       Try
           Dim cmd As New SqlCommand("Select IIF(Max(order_no) Is NULL,1,Max(order_no)+1)as order_no From wardya_cashier Where order_tybe ='" & order_type.Text & "'", Con)
           If Con.State = 1 Then Con.Close()
           Con.Open()
           Number = cmd.ExecuteScalar
           Con.Close()
       Catch ex As Exception
           Number = 0
           Con.Close()
       End Try
       Return Number
   End Function
صلوا على سيد الخلق سيدنا محمد
الرد }}}
تم الشكر بواسطة: DR.YASER , جيولوجي مبتدئ
#2
وعليكم السلام ورحمة الله  وبركاته

ربما أنت جعلت نوع الحقل نصي وليس رقمي في قاعدة البيانات
أذهب وغير نوعه إلى نوع رقمي وارجع جرب الكود..
========
السبب في حال النوع النصي فإن معيار القيمة الأعظمة يعتمد على محرف الحرف اليسار وليس قيمة الرقم بالكامل 
فيبحث عن الخانة اليسار ويرتب بموجبها .. وليس بالقيمة الرقمية.
فإذا أردت أن تخزن رقم في حقل نصي فعليك أن تعرف عدد الخانات للرقم الأعظم والذي قد يتم حفظه في هذا الحقل النص
ثم تجعل تنسيق الأرقام فيه مساوي لعدد الخانات - فلو كان العدد الأعظم هو 9999 يعني أربع تسعات فذها يعني أربع خانات
فلو أردت أن تكتب رقم ما فعليك أن تكتبه بصيغة الأربع خانات مثلاً :
الرقم واحد يكتب في الحقل  : 0001  وليس 1
الرقم اثنين يكتب في الحقل : 0002 وليس 2
الرقم واحد وعشرون يكتب في الحقل : 0021  ولي 21
 عندها لو طلبت أن يقوم الكود بترتيب القيم النصية فسيقوم بترتيبها ترتيباً صحيحاً سواء تصاعدي أو تنازلي ..
قال صلى الله عليه وسلم: 
«كلمتان خفيفتان على اللسان 
ثقيلتان في الميزان،حبيبتان إلى الرحمن: 
سبحان الله وبحمده، سبحان الله العظيم».
الرد }}}
#3
اخى الف شكر لحضرتك
بس ممكن ترفق الكود بعد التعديل
لانى مش قادر اغير تنسيق التيكست بوكس لاجعله 0001
صلوا على سيد الخلق سيدنا محمد
الرد }}}
تم الشكر بواسطة:
#4
المفروض يكون الرقم مخزن في قاعدة البيانات بالتنسيق الذي يناسب عدد الخانات الأعظم

مثلاً فيك تجعل مربع النص الثاني يعرض تنسيق لمربع النص الأول بأربع خانات من خلال الكود :
كود :
   Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
       TextBox2.Text = Format(Val(TextBox1.Text), "0000")
   End Sub

===========
لو غيرت نوع الحقل في قاعدة البيانات لحقل رقمي بدلاً من نصي وبقيت على كودك الأول - ربما يغنيك أن تحفظ الأرقام في حقل نصي بتنسيق كما في الكود السابق..
قال صلى الله عليه وسلم: 
«كلمتان خفيفتان على اللسان 
ثقيلتان في الميزان،حبيبتان إلى الرحمن: 
سبحان الله وبحمده، سبحان الله العظيم».
الرد }}}
تم الشكر بواسطة: حماده ممدوح البحيرى , asmarsou
#5
مليوووووووووووووون شكر ليك استاذ طه تم حل المشكلة
صلوا على سيد الخلق سيدنا محمد
الرد }}}
تم الشكر بواسطة: asmarsou , asmarsou


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ممكن حل المشكلة فى الكود التالي - من مشاركة استاذنا القدير / عبدالله الدوسري new_programer 4 169 02-03-24, 07:36 PM
آخر رد: new_programer
  ماهو حل هذا الخطأ في الكود melad2002 7 264 25-02-24, 12:25 AM
آخر رد: justforit
  كيفية انشاء سكريبت لقاعدة بيانات من خلال الكود heem1986 1 193 20-02-24, 12:00 AM
آخر رد: Kamil
  عدد الارقام العشريه ف الLabel Shafaga 29 8,549 31-01-24, 11:57 PM
آخر رد: muhammad_nasr
  [VB.NET] أرغب فى استخدام هذا الكود بالتحديد على الإصدار 10 AmeenRashed 3 206 19-01-24, 12:42 PM
آخر رد: Taha Okla
  [VB.NET] ما الخطأ فى هذا الكود - كود البحث المتعدد Ashraf Elafify 7 464 27-12-23, 10:50 PM
آخر رد: Ashraf Elafify
  [VB.NET] اريد تعديل في الكود عند طباعة DGV abu_hisham7 1 431 03-12-23, 02:40 AM
آخر رد: abu_hisham7
  [سؤال] توزيع الارقام على أكثر من تكست بوكس أبووسم 11 692 17-11-23, 12:04 AM
آخر رد: أبووسم
Star [VB.NET] كود لتوليد الارقام تلقائي في text box Raaf 5 619 08-11-23, 03:03 AM
آخر رد: VIP_YEMEN
  رجاء التعديل على الكود المرفق - كلاس لعرض كود المورد new_programer 4 357 13-10-23, 01:47 AM
آخر رد: new_programer

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


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