[ تمت الإجابة ]خطأ في كود التحديث

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

انا عندي جريد فيو وضعت فيه checkbox ووضعت كود (اذا وضعت علامة صح على اي صف يضع في عمود معين yes

هذا هو الكود

For Each gvRow As GridViewRow In GridView1.Rows

            'Dim chkItem As CheckBox = DirectCast(gvRow.FindControl("Ch"), CheckBox)
            Dim chkItem As CheckBox = gvRow.FindControl("Ch")
            If chkItem.Checked Then
                'gvRow.BackColor = Drawing.Color.Green
                gvRow.Cells(8).Text = "yes"
                'gvRow.Cells(6).Text = Date.Now
                Dim con As New OleDbConnection("Provider=MSDAORA.1;Password=oradev;User ID=emp;Data Source=expora;Persist Security Info=True")

                Dim cmd As New OleDbCommand("UPDATE emp_req SET late = 'yes' WHERE sno = &sno", con)
                'cmd.Parameters.AddWithValue("sno", GridView1.DataKeys(gvRow.RowIndex)("sno"))
                Dim RecNo = (GridView1.Rows(gvRow.RowIndex).Cells(0).Text)
                cmd.Parameters.AddWithValue("sno", RecNo)
                Try



                    con.Open()
                    cmd.ExecuteNonQuery()
                Finally

                    con.Close()
                    ' Else
                End Try    '  gvRow.BackColor = Drawing.Color.White

            End If
        Next

        'GridView1.DataBind()

اذا شغلته يظهر خطأ وهو

ORA-01008: not all variables bound