17-03-13, 11:45 PM
غريبه انا ما يعطي خطا ،، يمكن لان اسماء الحقول تشابه أسماء البار ميتر
ممكن تغير اسم البارميتر او تزيد عليه حروف مثل par_ ثم اسم الحقل
جرب
مثال
ممكن تغير اسم البارميتر او تزيد عليه حروف مثل par_ ثم اسم الحقل
جرب
مثال
كود :
Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\for my folder\my new project\حقيبة المبرمج\WindowsApplication39\bin\Debug\library code.mdb")
Dim insertcommand As New OleDbCommand("insert into subject_library ( subject_content , subject_node , subject_name , subject_tool , subject_notes) values ( subject_content= @Par_subject_content , subject_node= @Par_subject_node , subject_name= @Par_subject_name , subject_tool= @Par_subject_tool , subject_notes= @Par_subject_notes)", con)
insertcommand.Parameters.Clear()
insertcommand.Parameters.AddWithValue("@Par_subject_content", OleDbType. WChar).Value = Trim(TextBox1.Text)
insertcommand.Parameters.AddWithValue("@Par_subject_node", OleDbType. WChar).Value = Trim(TextBox2.Text)
insertcommand.Parameters.AddWithValue("@Par_subject_name", OleDbType. WChar).Value = Trim(TextBox3.Text)
insertcommand.Parameters.AddWithValue("@Par_subject_tool", OleDbType. WChar).Value = Trim(TextBox4.Text)
insertcommand.Parameters.AddWithValue("@Par_subject_notes", OleDbType. WChar).Value = Trim(TextBox5.Text)
con.Open()
insertcommand.ExecuteNonQuery()
con.Close()