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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : جلب اكثر من بيانات داخل التيكست بوكس (/showthread.php?tid=7339)



جلب اكثر من بيانات داخل التيكست بوكس - Mido9 - 11-12-12

السلام عليكم ورحمة الله وبركاتة

اخواني الافاضل

انا الان لدي فورم به عدد 3 تيكست بوكس لوضع اسماء العمال بهم

و انا لدي عدد 3 اسماء فى القاعده

اريد ان يأخذ كل تيكست بوكس اسم

بحيث يكون بهذا الشكل
textbox1.text = name1
textbox2.text = name2
textbox3.text = name3

فكيف يكون شكل الاستعلام لوضع فى كل تيكست بوكس اسم ؟

و جزاكم الله خيرا


جلب اكثر من بيانات داخل التيكست بوكس - Mido9 - 11-12-12

يا اخواني اظن ان الامر ممكن بإستخدام while ؟

و لكن للاسف لا استطيع إستخدامها مع الإستعلامات لعمل النطلوب

برجاء المساعده بالله عليكم


جلب اكثر من بيانات داخل التيكست بوكس - Sajad - 11-12-12

السلام عليكم

PHP كود :
Dim t() As TextBox = {TextBox1TextBox2TextBox3}
        For 
0 To t.Length
            t
(i).Text DataSet1.Tables("yourtable").Rows(i)("tablename").ToString()
        
Next 

بالتوفيق ان شاءالله


جلب اكثر من بيانات داخل التيكست بوكس - Mido9 - 11-12-12

sajad كتب :السلام عليكم

PHP كود :
Dim t() As TextBox = {TextBox1TextBox2TextBox3}
        For 
0 To t.Length
            t
(i).Text DataSet1.Tables("yourtable").Rows(i)("tablename").ToString()
        
Next 

بالتوفيق ان شاءالله

جزاك الله خيرا اخي الفاضل على المساعده

انا جعلت الكود كله بهذا الشكل

PHP كود :
Dim saveinto As New OleDb.OleDbCommand
        Dim constr 
As String "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" Application.StartupPath "\db.mdb"
        
Dim conn As New OleDb.OleDbConnection(constr)
        
Dim DataSet1 As New DataSet
        Dim SQLstr 
As String
        Dim i 
As Integer
        SQLstr 
"SELECT * From factor "
        
conn.Open()
        
Dim t() As TextBox = {TextBox1TextBox2TextBox3}
        For 
0 To t.Length
            t
(i).Text DataSet1.Tables("factor").Rows(i)("factor_name").ToString()
        
Next 


و لكن ظهر لي الخطأ التالي

PHP كود :
Object reference not set to an instance of an object

مع العلم اسم الجدول factor و اسم الحقل factor_name


جلب اكثر من بيانات داخل التيكست بوكس - تركي قرمزلي - 12-12-12

أظن أنه عليك إضافة البيانات إلى dataset بواسطة dataadapter

PHP كود :
DIM DA AS NEW OLEDBDATAADAPTER(SQLSTR,CONN)
DA.FILL(DATASET1,"FACTOR"


تضع هذين السطرين قبل حلقة FOR....NEXT

بالتوفيق إن شاء الله


جلب اكثر من بيانات داخل التيكست بوكس - Mido9 - 12-12-12

أبو أسامة تركي كتب :أظن أنه عليك إضافة البيانات إلى dataset بواسطة dataadapter

PHP كود :
DIM DA AS NEW OLEDBDATAADAPTER(SQLSTR,CONN)
DA.FILL(DATASET1,"FACTOR"


تضع هذين السطرين قبل حلقة FOR....NEXT

بالتوفيق إن شاء الله


جزاك الله خيرا على المساعده و لكن للاسف ظهر نفس الخطأ Sad


جلب اكثر من بيانات داخل التيكست بوكس - Sajad - 12-12-12

السلام عليكم

يا اخي العزيز لا تضع الكود مع نص الاتصال في نفس الزر

وانما ضع الكود في زر اخر ثم نفذ ,ومن ثم كلام الاخ ابو اسامة تركي صحيح ,كيف تريد ان تظهر البيانات وانت اصلا لم تقم بملىء الDataset????