اريد معرفة معني الرسالة التي تظهر في الصورة المرفقة؟؟؟؟ وهل يوجد خطأ في كود الحفظ المرفق؟؟؟
Protected Sub Save_btn_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Save_btn.Click
Dim conn As New SqlConnection
Dim cmd As New SqlCommand
Dim reader As SqlDataReader
conn.ConnectionString = "server=.;database=school;trusted_connection=true"
conn.Open()
cmd.CommandTimeout = 500
cmd.Connection = conn
'cmd.CommandText = "insert into student_data_new (national_no,student_name,birth_date,sex,nationality,gov,city,day_t,month_t,year_t,raw,mam_name,dad_job,Kaid_no,tel,address) values (" + nat_no.Text + "," + st_nam.Text + "," + birth_day_txt.Text + "," + sex_combo.SelectedValue + "," + nationality_combo.SelectedValue + "," + birth_place_combo.SelectedValue + "," + birth_city_combo.SelectedValue + "," + od.Text + "," + om.Text + "," + oy.Text + "," + raw_combo.SelectedValue + "," + mom_name_txt.Text + "," + dad_job_txt.Text + "," + kaid_no_txt.Text + "," + tels_txt.Text + "," + address_txt.Text + " )"
cmd.CommandText = "insert into student_data_new (national_no,sex,nationality,gov,city,day_t,month_t,year_t,raw,mam_name,dad_job,Kaid_no,tel,address) values (" + nat_no.Text + "," + sex_combo.SelectedValue + "," + nationality_combo.SelectedValue + "," + birth_place_combo.SelectedValue + "," + birth_city_combo.SelectedValue + "," + od.Text + "," + om.Text + "," + oy.Text + "," + raw_combo.SelectedValue + "," + mom_name_txt.Text + "," + dad_job_txt.Text + "," + kaid_no_txt.Text + "," + tels_txt.Text + "," + address_txt.Text + " )"
reader = cmd.ExecuteReader()
cmd.ExecuteNonQuery()
If reader.Read Then
End If
conn.Close()
End Sub
