14-07-15, 02:59 AM
بسم الله الرحمن الر حيم
السلام عليكم ورحمة الله وبركاته
اخوتي في الله
حفظكم الله
لدي مشروع قاعدة بيانات اكسس 2007 مع فيجوال بيسك دوت نت 2012
وانا في البداية واخذت الاكواد من مشروع موجود هنا للاخ سعود الله يرجعه بالسلامه ويحفظه
الكود هو زر الاضافة
ما المشكلة في هذا الكود
تظهر هذه الصورة بعد الضغط على زر الحفظ
وهذه حقول قاعدة البيانات
هذا وبإنتظاركم
حفظكم الله
السلام عليكم ورحمة الله وبركاته
اخوتي في الله
حفظكم الله
لدي مشروع قاعدة بيانات اكسس 2007 مع فيجوال بيسك دوت نت 2012
وانا في البداية واخذت الاكواد من مشروع موجود هنا للاخ سعود الله يرجعه بالسلامه ويحفظه
الكود هو زر الاضافة
ما المشكلة في هذا الكود
PHP كود :
Try
Dim sq As String = "select * from T_Information"
Dim ds1 As New DataSet
Dim da1 As New OleDbDataAdapter(sq, con)
da1.Fill(ds1, "T_Information")
Dim cc As New OleDbCommandBuilder(da1)
Dim dr As DataRow = ds1.Tables("T_Information").NewRow
dr.Item(1) = fusername
dr.Item(2) = TextBox2.Text
dr.Item(3) = TextBox3.Text
dr.Item(4) = TextBox4.Text
dr.Item(5) = TextBox5.Text
dr.Item(6) = TextBox6.Text
dr.Item(7) = TextBox7.Text
dr.Item(8) = TextBox8.Text
dr.Item(9) = TextBox9.Text
dr.Item(10) = TextBox12.Text
ds1.Tables("T_Information").Rows.Add(dr)
da1.Update(ds1, "T_Information")
MsgBox("تمت الاضافة")
Dim ff As New Form13
ff.Show()
Me.Hide()
Catch ex As Exception
MsgBox(Err.Description, MsgBoxStyle.Critical, "")
End Try
تظهر هذه الصورة بعد الضغط على زر الحفظ
وهذه حقول قاعدة البيانات
هذا وبإنتظاركم
حفظكم الله

