+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مشكله في علاقة m to n (/showthread.php?tid=8355)
الصفحات:
1
2
مشكله في علاقة m to n - مبرمج أوتار - 07-04-13
بارك الله فيك يا اخ ابو ايهاب
كيف يمكن استخدم
Parameters
ممكن تضع مثال له ....
مشكله في علاقة m to n - Abu Ehab - 07-04-13
أنا أقصد :
طريقة تمريرك للمعاملات كانت خاطئة
لو عايز تمرر قيم نصية يجب ان تستخدم العلامه المفردة '
بالنسبة للبارميترز ,, هي أضمن وأكثر امان , وبتاخد راحتك أكثر في كتابتها وممكن تحدد نوع المدخلات لو عايز وممكن تفرغ وتهدم الباراميتر لو عايز ,,
وموجود في المنتدى عشرات الأمثلة عليها .... أبحث ,, بعتذر منك ما عندي وقت الأن .
مشكله في علاقة m to n - مبرمج أوتار - 07-04-13
بارك الله فيك
لاكن واجهتني مشكله في الكود التالي :-
كود :
Dim sql As String = String.Empty
sql = (" INSERT INTO Record" & _
" " & _
" ( ID, IDstu)" & _
" " & _
" VALUES " & _
" ")
Dim comm As New SqlCommand(sql, sqlconn)
comm.Parameters.AddWithValue("@ID ", Me.Combo_no_st.SelectedValue)
comm.Parameters.AddWithValue("@IDstu ", Me.comb_no_uit.SelectedValue)
sqlconn.Open()
comm.ExecuteNonQuery()
sqlconn.Close()مشكله في علاقة m to n - مبرمج أوتار - 07-04-13
كود :
Try
Dim saveok As Boolean
saveok = winClass.SQLExicute("Insert Into Record (ID,IDstu) values (' & Combo_no_st.SelectedValue & ',' & comb_no_uit.SelectedValue & ')")
If saveok = True Then
MsgBox("تمت عملية حفظ البيانات بنجاح", MsgBoxStyle.Exclamation, "تأكيد عملية الحفظ")
End If
Catch ex As Exception
MsgBox(ex.Message)
End Tryبعد تعديل الكود السابق تظهر مشكله
Conversion failed when converting the varchar value ' & Combo_no_st.SelectedValue & ' to data type int
مشكله في علاقة m to n - kslawy - 07-04-13
ربما كانت المشكلة في إسناد الحقول لأداة الـ ComboBox ورينا الكود الذي تملأ به الأداة الظاهرة في رسالة الخطأ
Combo_no_st
مشكله في علاقة m to n - مبرمج أوتار - 07-04-13
هذا هو الكود
كود :
Dim Ds As New DataSet
Dim Dx As New SqlDataAdapter
Dim d As New DataTable()
Dx.SelectCommand = New SqlCommand("Select * From Student", sqlconn)
Dx.Fill(Ds, "Student")
d = Ds.Tables(0)
Combo_no_st.DataSource = d
Combo_no_st.DisplayMember = "IDstu"
TextName.DataBindings.Add("Text", d, "Namestu")
Textmob.DataBindings.Add("Text", d, "Mobilestu")مشكله في علاقة m to n - kslawy - 07-04-13
كود :
[color=#333333] Combo_no_st.DataSource = d[/color]
[color=#333333] Combo_no_st.DisplayMember = "IDstu"[/color]الـ DisplayMember دائما بيسند لها القيمة التي ستظهر للمستخدم مثل اسم الطالب والحقل IDstu حقل رقمي كما هو مبين في مثالك
وشيء آخر ناقص في كودك وهو ValueMember وهو الذي يجب أن تسند له الحقل الرقمي IDstu
ليصبح الكود :
كود :
[/COLOR][/SIZE] Combo_no_st.DataSource = d Combo_no_st.DisplayMember = "ضع هنا اسم الطالب مثلا"
Combo_no_st.ValueMember = "IDstu"[SIZE=4][COLOR=#333333]جرب وشوف
مشكله في علاقة m to n - مبرمج أوتار - 07-04-13
الحمدالله يارب اشتغل الكود هذا بفضل الله ثم بفضل اخوي kslawy
بارك الله فيك
اتمنى لك التوفيق يالغالي
مشكله في علاقة m to n - مبرمج أوتار - 07-04-13
