السلام عليكم ورحمة الله وبركاته :)
اخواني .. مشكورين لجهودكم الرائعة ... وأسأل الله ان ينفع بعلمكم ويجزيكم خير الجزاء ..... .
عندي مشكلة الله يبارل فيكم ..... كود إضافة اسم موظف على الداتا بيز إس كيو إل 2000 والخطاأ موضع بجانب الجملة التي يظهر عندها
Dim conn As New SqlConnection Dim cmd As New SqlCommand conn.ConnectionString = "Data Source=PC100-042295F4E;" & "Trusted_connection=yes;" & "initial Catalog=Client;" cmd.CommandText = "Insert into Emp_Info (Emp_FrName,Emp_Sname,Emp_Fname,Emp_Address,Emp_Tel,Emp_Position) Values ( ' " + txtFirstName.Text + " ',' " + txtSecondName.Text + " ','" + txtFamilyName.Text + "','" + txtAddressEmp.Text + " ','" + txtTel.Text + "','" + (ComboBox1.SelectedIndex) + "' )" ' Error ...**** cmd.Connection = conn conn.Open() cmd.ExecuteNonQuery() conn.Close()