منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
طريقة بحث و إظهار حقل معين من سجلين مختلفين ,, ولكن يتساويا في رقم المستخدم - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : طريقة بحث و إظهار حقل معين من سجلين مختلفين ,, ولكن يتساويا في رقم المستخدم (/showthread.php?tid=14233)



طريقة بحث و إظهار حقل معين من سجلين مختلفين ,, ولكن يتساويا في رقم المستخدم - ahmed_elwerfalli - 26-12-15

السلام عليكم ,, 
لو فرضنا ان لدينا جدول يحتوي على (ID_user,user_name,phone_no) 
و يوجد اكثر من مستخدم يملك أكثر من خط هاتف ,, (هاتف أرضي ,, و يحتوي على 7 ارقام ) (هاتف نقال و يحتوي على 9 ارقام) ولكن كل رقم موجود في سجل لوحده 
كما موضح بالصورة 


أريد معرفة الكود المناسب ,, و كيفية إجراء الحلقة ,, لإظهار الرقم الاول على text1 و الرقم الثاني على text2  و البحث يكون برقم المستخدم ,, 
"select * from table1 where t_no = id_user"
المعنى أبحث عن طريق رقم المستخدم و يظهرلي رقم الموبايل في تيكست ,, و الهاتف الارضي في تيكست آخر .. 
مشكورين سلفاً


RE: طريقة بحث و إظهار حقل معين من سجلين مختلفين ,, ولكن يتساويا في رقم المستخدم - Adrees - 26-12-15

تفضل اخ احمد

PHP كود :
Dim dt As New DataTable()
 
       Dim da As New SqlDataAdapter("select * from EmpTB where EmpName=@Ename"con)
 
       da.SelectCommand.Parameters.AddWithValue("@Ename"Ename)
 
       da.Fill(dt)
 
       If dt.Rows.Count 0 Then
            TextBox1
.Text dt.Rows(0)(1)
 
           TextBox2.Text dt.Rows(0)(2)
 
           TextBox3.Text dt.Rows(0)(3)

 
       End If 



RE: طريقة بحث و إظهار حقل معين من سجلين مختلفين ,, ولكن يتساويا في رقم المستخدم - ahmed_elwerfalli - 26-12-15

PHP كود :
Dim dt As New DataTable()
 
       Dim da As New SqlDataAdapter("select * from EmpTB where EmpName=@Ename"con)
 
       da.SelectCommand.Parameters.AddWithValue("@Ename"Ename)
 
       da.Fill(dt)
 
       If dt.Rows.Count 0 Then
            TextBox1
.Text dt.Rows(0)(1)
 
           TextBox2.Text dt.Rows(0)(2)
 
           TextBox3.Text dt.Rows(0)(3)

 
       End If 

بارك اللهفيك ,, بس عندي مشكلة SqlDataAdapter ما عرفت أحلها 



RE: طريقة بحث و إظهار حقل معين من سجلين مختلفين ,, ولكن يتساويا في رقم المستخدم - Adrees - 26-12-15

غير الاتصال من oledbconnection الى sqlconnection
لوسمحت ضع لنا الكود الخاص بالاتصال


RE: طريقة بحث و إظهار حقل معين من سجلين مختلفين ,, ولكن يتساويا في رقم المستخدم - ahmed_elwerfalli - 27-12-15

(26-12-15, 04:28 PM)Adrees كتب : غير الاتصال من  oledbconnection الى sqlconnection
لوسمحت ضع لنا الكود الخاص بالاتصال

كود :
Dim s As String = "provider=microsoft.jet.oledb.4.0;" & "data source=" & Application.StartupPath & "\db11.mdb"
   (Public cn As New OleDbConnection(s)



RE: طريقة بحث و إظهار حقل معين من سجلين مختلفين ,, ولكن يتساويا في رقم المستخدم - Adrees - 27-12-15

ارجوا المعذرة لم انتبه الى قاعدة البيانات لقد وضعت لك كود متعلق بالـــ sqlserver
عموما الامر بسيط ان شاء الله فقط غير SqlDataAdapter الى OledbDataAdapter


RE: طريقة بحث و إظهار حقل معين من سجلين مختلفين ,, ولكن يتساويا في رقم المستخدم - ahmed_elwerfalli - 27-12-15

(27-12-15, 02:09 AM)Adrees كتب : ارجوا المعذرة لم انتبه الى قاعدة البيانات لقد وضعت لك كود متعلق بالـــ sqlserver
عموما الامر بسيط ان شاء الله فقط غير SqlDataAdapter الى OledbDataAdapter

اشتغل 100% بارك الله فيك ,, في ميزان حسناتك إن شاء الله  ..