تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] الاستعلام على رقم معين في حقل
#1
السلام عليكم 

لدي جدول يحتوي على عدة حقول من بينها الحقلين     ID_Num  ,   Gender

حيث أن الحقل ID_Num يحتوي على بيانات كالتالي:

1998800002356
2898800002333
1998800002446
2898800002783
حيث أن الرقم على اليسار 1 أو 2 
أريد أن احفظ هذا الرقم في الحقل Gender

 Gender                                           ID_Num  
1998800002356                                      1
2898800002333                                      2
1998800002446                                      1
2898800002783                                      2


والسلام عليكم
الرد }}}
تم الشكر بواسطة:
#2
يمكنك استخدام substring اذا حولت الرقم الوطني إلى نص string
كود :
GenderIdentifier = NationalNumber.ToString().Substring(0,1)


أو باستخدام LINQ
كود :
Dim GenderIdentifier = NationalNumber.First()

الرد }}}
تم الشكر بواسطة: elgokr
#3
شكرًا اخي على الرد 
هل يمكن أن توضح استخدام الدالة في جملة الاستعلام SQL   UPDATE
بارك الله فيك
الرد }}}
تم الشكر بواسطة:
#4
القيمة الناتجة من الدالة ضعها في متغير جديد ثم مرره في امر الادخال الى قاعدة البيانات أيا كان نوعه ado او linq

الرد }}}
تم الشكر بواسطة: elgokr
#5
توضيحاً واضافة لما قدمه الاخ محمد كريّم

فى البداية يجب ان يتم جلب القيمة للارقام المذكورة بالاعلى
وليكن ان القيمة تكتب او يتم جلبها من جدول على اى حال
ويتم اضافة القيمة اما فى Textbox أو فى تعرف متغير أو ما شبه

فمثلاً القيمة لديك يتم تعرفها اما فى التالى كمثال..
كود :
Dim Number_ As Long = 1998800002356

ليتم جلب الرقم الاول من القيمة من خلال الكود
كود :
MsgBox(Number_.ToString.Substring(0, 1))

فعند كود التحديث بقاعد البيانات يتم الاستخدام بهذا الشكل
كود :
"UPDATE table_name SET Gender = "& Number_.ToString.Substring(0, 1) &" WHERE ID_Num ="& Number_

أو مثلاً ان القيمة تصل الى TextBox مثل الكود التالى كمثال
كود :
TextBox1.Text = 1998800002356

ليتم جلب الرقم الاول من القيمة من خلال الكود
كود :
MsgBox(TextBox1.Text.Substring(0, 1))

فعند كود التحديث بقاعد البيانات يتم الاستخدام بهذا الشكل
كود :
"UPDATE table_name SET Gender = "& TextBox1.Text.Substring(0, 1) &" WHERE ID_Num ="& TextBox1.Text

وهذا ما يشير اله اخى الفاضل محمد كريّم

واتمنى ان الصورة وضحت لك كاملاً

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

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


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: محمد كريّم
#6
السلام عليكم
أشكر الاخوة على الرد والتوضيح ..
إلا أنني أحتاج إلى تغيير عدد كبير من السجلات يصل إلى عشرات الآلاف .. 
حيث أن حقل ID_Num  موجودة قيمته في الجدول وحقل غير موجودة وأريد تعبئته بناءً على آخر رقم من الجهة اليسرى لحقل ID_Num  كالتالي:

Gender                                           ID_Num  
1998800002356                                      1
2898800002333                                      2
1998800002446                                      1
2898800002783                                      2

فهل يمكن استخدام الدالة Substring أو أي دالة أخرى في جملة sql  للحقول مباشرة دون استدعائها أو عرضها ...
أشكركم مرة أخرى 
والسلام عليكم 
الرد }}}
تم الشكر بواسطة: elgokr , elgokr
#7
(01-08-18, 11:00 AM)Elhatmi كتب : السلام عليكم
أشكر الاخوة على الرد والتوضيح ..
إلا أنني أحتاج إلى تغيير عدد كبير من السجلات يصل إلى عشرات الآلاف .. 
حيث أن حقل ID_Num  موجودة قيمته في الجدول وحقل غير موجودة وأريد تعبئته بناءً على آخر رقم من الجهة اليسرى لحقل ID_Num  كالتالي:

Gender                                           ID_Num  
1998800002356                                      1
2898800002333                                      2
1998800002446                                      1
2898800002783                                      2

فهل يمكن استخدام الدالة Substring أو أي دالة أخرى في جملة sql  للحقول مباشرة دون استدعائها أو عرضها ...
أشكركم مرة أخرى 
والسلام عليكم 


نعم
SQL Server فيه دالة substring خاصة
الفرق بينها وبين دالة الدوت نت انها تبدأ العد من 1 في الباراميتر الأول بدلا من 0
اقرأ عنها أكثر مع الأمثلة من هنا
https://www.techonthenet.com/sql_server/...string.php

اذا لم تفلح في انشاء الاستعلام أخبرني

الرد }}}
تم الشكر بواسطة: elgokr
#8
السلام عليكم
أشكرك أخي محمد على اهتمامك ..

أنا أرغب في جملة Update وذلك لتعديل حقل Gender من آخر رقم في حقل ID_Num  لأن كمية البيانات كبيرة جدا
   
جملة التعديل في vb.net حيث أني كتبتها بهذه الطريقة ولكن لم أنجح

cmd.CommandText = "Update table set Gender  ID_Num(Substring(0, 1))

بارك الله فيك
الرد }}}
تم الشكر بواسطة: elgokr , elgokr
#9
(01-08-18, 03:34 PM)Elhatmi كتب : السلام عليكم
أشكرك أخي محمد على اهتمامك ..

أنا أرغب في جملة Update وذلك لتعديل حقل Gender من آخر رقم في حقل ID_Num  لأن كمية البيانات كبيرة جدا
   
جملة التعديل في vb.net حيث أني كتبتها بهذه الطريقة ولكن لم أنجح

cmd.CommandText = "Update table set Gender  ID_Num(Substring(0, 1))

بارك الله فيك


أولا وقبل عمل أي خطوة خذ نسخة من قاعدة البيانات
ثانيا يفضل ان تقوم بالاستعلام داخل sql server وليس من برنامجك

الاستعلام يكون بهذا الشكل

كود :
Update table set Gender = SUBSTRING(ID_Num, 1, 1)


لم أجربه ولكن اعتقد انه يحتاج لشرط where بحيث لا يعتمد قيمة اول حقل ويدرجها لكل الحقول

الرد }}}
تم الشكر بواسطة: elgokr , munimteer
#10
السلام عليكم 
أخي محمد جربت على sql server نجحت العملية 
ولكم في الفيجوال دوت نت لم تنجح 

آسف جدا على تعبك معايا
وشكرًا لاهتمامك
بارك الله فيك 
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تعديل طول حقل معين في جميع جداول القاعدة atefkhalf2004 1 97 09-03-24, 03:17 AM
آخر رد: atefkhalf2004
  [VB.NET] البحث باستخدام CheckedListBox لتكون نتيجة التحديد شرط لجملة الاستعلام ahmedramzyaish 0 116 19-02-24, 03:44 AM
آخر رد: ahmedramzyaish
Lightbulb [VB.NET] إطهار الصورة بمقاس معين في DataGridView أبو خالد الشكري 2 323 14-12-23, 03:01 PM
آخر رد: أبو خالد الشكري
  [VB.NET] مساعدة فى ترتيب نتائج الاستعلام ZEEN4ZEEN 1 362 08-11-23, 01:34 AM
آخر رد: الحزين اليماني
  كيف اجعل البرنامج في بداية الشهر ينفذ حدث معين بالاصح اريد البرنامج في تاريخ واحد من Adel27213 3 484 05-11-23, 01:45 AM
آخر رد: justforit
  كيفية جمع قيمة على تاريخ معين واستنتاج تاريخ أخر Ahmed.vb 1 317 02-11-23, 03:52 AM
آخر رد: Taha Okla
  إجبار المستخدم على إدخال عدد معين من الأرقام Ahmed.vb 6 656 20-10-23, 10:25 AM
آخر رد: atefkhalf2004
  كود تغيير قيمة تكست بوكس فى تاريخ معين Ahmed.vb 2 907 11-10-23, 10:35 PM
آخر رد: aljzazy
  [VB.NET] مساعدة فى طريقة كتابة الاستعلام ZEEN4ZEEN 4 435 11-10-23, 03:33 PM
آخر رد: ZEEN4ZEEN
  حفظ المشروع بامتداد معين غير معروف مسبقا Abo Louay 0 262 29-09-23, 02:55 AM
آخر رد: Abo Louay

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


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