مشكلة في الحفظ؟؟؟؟

اخوتي انا اكتب الكود هذا في التعديل والحفظ :

Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
        Dim cmd As New SqlCommand("", conn)
        If UpdateFlag Then
            cmd.CommandText = "update admin set " & _
            "NAME='" & txt_NAME.Text & "'," & _
            "admin_add='" & chk_add.Checked & "', " & _
            "admin_delete='" & chk_delete.Checked & "', " & _
            "admin_update='" & chk_update.Checked & "', " & _
            "admin_view='" & chk_view.Checked & "', " & _
                        "USERNAME='" & txt_USERNAME.Text & "', " & _
            "PASSWORD='" & txt_PASSWORD.Text & "' " & _
            "Where Id=" & txt_id.Text
        Else
            cmd.CommandText = "INSERT INTO .[dbo].[admin]( [NAME], [username], [password], [admin_add], [admin_delete], [admin_update], [admin_view]) values('" & _
                txt_NAME.Text & "', '" & _
               chk_add.Checked & "', '" & _
             chk_delete.Checked & "', '" & _
            chk_update.Checked & "', '" & _
                chk_view.Checked & "', " & _
                txt_USERNAME.Text & "', '" & _
                txt_PASSWORD.Text & "' )"
        End If
        conn.Open()
        cmd.ExecuteNonQuery()
        FillDataset()
            conn.Close()
    End Sub

علما بان لدي رقم بس الرقم يأتي تلقائي و اسم وواسم مستخدم وكلمة مرور واربعة حقول من نوع Checkbox (بت) تعطي قيمة 0و1 في الجدول SQL

وانا في التعديل او الحفظ اريده ان يحفظ الاسم واسم المستخدم وكلمة السر واذا وضع صح على أي مربع من ال Checkbox يعطني في الجدول 1 واذا لم يضع صح يعطي صفر طبعا في ال SQL

علما بانها كلها جدول واحد .

فهل الخطأ في الفواصل ؟؟؟؟؟؟

وعند التنفيذ بهذا الشكل يعطيني رسالة ويأشر بالاخضر على الجملة :

cmd.ExecuteNonQuery()

وشكرااااا