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

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

كيفية حفظ بيانات اللست بوكس - aftfm - 26-01-18

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

لدي كود واريد حفظ بيانات اللست بوكس 

البيانات الشركة + الاسم + الرقم

الاسم عبارة عن مجموعة  اسماء في اللست بوكس

 
PHP كود :
 Dim cmd As New OleDbCommand("insert into tblUniversity(TheDignitaries,Name,IDNum)values(?,?,?)", Con)

        Call cmd.Parameters.AddWithValue("@TheDignitaries", Trim(cmbDigType.Text))
        Call cmd.Parameters.AddWithValue("@Name", Trim(txtUName.Text))
        Call cmd.Parameters.AddWithValue("@IDNum", Trim(txtIDNum.Text))
       
        Con.Open()
        cmd.ExecuteNonQuery()
        Con.Close()
        MsgBox("تم الحفظ بنجاح", MsgBoxStyle.Information, "حفظ")
        Clear() 

هذا الكود الذي استخدمه في الحفظ قبل اضافة ا للست بوكس للمشروع
اريد استبدال (txtUName) واضع اداة اللست بوكس واضيف عليها الاسماء اي كان عدد الاسماء 

المهم الشركة + بيانات اللست بوكس + الرقم 

مع العلم ان الرقم ثابت لا يتكرر مثل الاسماء

RE: كيفية حفظ بيانات اللست بوكس - محمود صالح - 27-01-18

حط جملة الحفظ في 
PHP كود :
For I As Integer = 0 To ListBox1.Items.Count - 1

            Next 

وغير  txtUName   بـــــ  ListBox1.Text

RE: كيفية حفظ بيانات اللست بوكس - aftfm - 30-01-18

تم عمل For

ولكن بعد التنفيذ حفظ كل بيانات الليست بوكس في سجد جديد

بمعنى لو لدي 4 اسماء في الليست بوكس 
تم حفظها بعدد 4 سجلات في قاعدة البيانات

RE: كيفية حفظ بيانات اللست بوكس - محمود صالح - 31-01-18

لو عاوزه بدون تكرار
نفذ من غير for 
مع تغير وغير  txtUName   بـــــ  ListBox1.Text

يارب اكون فهمتك