[@@أبورائد@@]

السلام عليكم ورحمة الله وبركاته




انتبه لترتيب أسطر Parameters هو نفس تريب الحقول في جملة SQL

PHP كود :

Dim sql As String = "Insert Into users" & _
                    " ( [user], [pass], [Approve], [SMR], [KH], [SA], [NA], [MOD1], [AH], [NO], [AZ], [MA], [SJ], [MOA], [HA], [OL] ) " & _
                    " Values " & _
                    " ( @user,  @pass,  @Approve,  @SMR,  @KH,  @SA,  @NA,  @MOD1,  @AH,  @NO,  @AZ,  @MA,  @SJ,  @MOA,  @HA,  @OL  ) "
Dim cmd As New OleDb.OleDbCommand(sql, con)
cmd.Parameters.AddWithValue("@user      ", TextBox1.Text)
cmd.Parameters.AddWithValue("@pass      ", TextBox2.Text)
cmd.Parameters.AddWithValue("@Approve   ", CheckBox15.Checked)
cmd.Parameters.AddWithValue("@SMR       ", CheckBox2.Checked)
cmd.Parameters.AddWithValue("@KH        ", CheckBox3.Checked)
cmd.Parameters.AddWithValue("@SA        ", CheckBox4.Checked)
cmd.Parameters.AddWithValue("@NA        ", CheckBox5.Checked)
cmd.Parameters.AddWithValue("@MOD1      ", CheckBox6.Checked)
cmd.Parameters.AddWithValue("@AH        ", CheckBox7.Checked)
cmd.Parameters.AddWithValue("@NO        ", CheckBox8.Checked)
cmd.Parameters.AddWithValue("@AZ        ", CheckBox9.Checked)
cmd.Parameters.AddWithValue("@MA        ", CheckBox10.Checked)
cmd.Parameters.AddWithValue("@SJ        ", CheckBox11.Checked)
cmd.Parameters.AddWithValue("@MOA       ", CheckBox12.Checked)
cmd.Parameters.AddWithValue("@HA        ", CheckBox13.Checked)
cmd.Parameters.AddWithValue("@OL        ", CheckBox14.Checked) 


السلام عليكم ورحمة الله وبركاته