07-11-15, 11:37 PM
السلام عليكم ورحمة الله وبركاتة
يا أخوان عندي مشكلة ان شاء الله بسيطه
في زر الحفظ بعد التعديل يظهر خطاء كما في الصورة
وهذا الكود
اتمنى اجد حل لديكم
وشكراً لكم
يا أخوان عندي مشكلة ان شاء الله بسيطه
في زر الحفظ بعد التعديل يظهر خطاء كما في الصورة
وهذا الكود
PHP كود :
Dim id As Integer = CInt(Form2.DataGridView1(0, Form2.DataGridView1.SelectedRows(0).Index).Value.ToString())
Dim str As String = String.Format("Update [zarsw] set [alaism] = '{1}',[aljinsia] = '{2}',[nawe alhuia] = '{3}',[raqm alhuia] = '{4}',[masdar alhuia] = '{5}',[tarikh alhuia] = '{6}',[raqm lawhat alssayara] = '{7}',[eadad almurafiqin] = '{8}',[alshshakhs almurad ziaratih] = '{9}',[alskn/alqism/alshsharaka] = '{10}',[raqm kart alzzayir] = '{11}',[tarikh alddukhul] = '{12}',[waqt alddukhul] = '{13}',[aism madkhal bayanat alddu] = '{14}',[raqm madkhal bayanat alddukhul] = '{15}',[tarikh alkhuruj] = '{16}',[waqt alkhuruj] = '{17}',[aism madkhal bayanat alkhuruj ]= '{18}',[raqm madkhal bayanat alkhuruj] = '{19}' where [alrraqm]={0}", TextBox1.Text, TextBox2.Text, TextBox3.Text, TextBox4.Text, TextBox5.Text, TextBox6.Text, TextBox7.Text, TextBox8.Text, TextBox9.Text, TextBox10.Text, TextBox11.Text, TextBox12.Text, TextBox13.Text, TextBox14.Text, TextBox15.Text, TextBox16.Text, TextBox17.Text, TextBox18.Text, TextBox19.Text, id)
Dim cmd As New OleDbCommand(str, co)
co.Open()
cmd.ExecuteNonQuery()
co.Close()
MsgBox(" تمت تعديل الزائر بنجاح")
zarsw.Clear()
dazarsw = New OleDbDataAdapter("select * from zarsw", co)
dazarsw.Fill(zarsw)
Form2.DataGridView1.DataSource = zarsw
Close()
Form2.Show()
اتمنى اجد حل لديكم
وشكراً لكم
اللهم يا ارحم الراحمين ارحم اخي اباليث رحمة واسعة