I am inserting a value into a field of a table and if same customer already exists in the table then update that field instead of having duplicate entries.
Data being inserted successfully at first entry but not updating after more entries. Table only contains first inserted data.
This is my code. I think problem would be in my update method but i couldn't figure out.

Code:
  Public Sub checkClient(ByVal cName As String, ByVal total1 As String, ByVal total2 As String)

        Using connCheck As New OleDbConnection(myGlobals.getDBPath)

            connCheck.Open()

            Using cmdCheck As New OleDbCommand("SELECT * FROM " & bookTable & " WHERE CustomerName=@Name", connCheck)

                cmdCheck.Parameters.AddWithValue("@Name", cName)

                Dim reader As OleDbDataReader = cmdCheck.ExecuteReader

                If reader.Read = True Then

                    updateClientBook(cName, total1, total2)

                    MsgBox("updated " + cName + " pos1: " + total1 + "pos2: " + total2)

                Else

                    insertClientBook(cName, total1, total2)

                End If

            End Using

        End Using


    End Sub

    Public Sub insertClientBook(ByVal cName As String, ByVal total1 As Integer, ByVal total2 As Integer)

        Using connInsert As New OleDbConnection(myGlobals.getDBPath)

            connInsert.Open()

            Using cmdInsert As New OleDbCommand("INSERT INTO " & bookTable & " (CustomerName, posTeam1, posTeam2) VALUES (@Name, @p1, @p2)", connInsert)

                cmdInsert.Parameters.AddWithValue("@Name", cName)

                cmdInsert.Parameters.AddWithValue("@p1", total1)

                cmdInsert.Parameters.AddWithValue("@p2", total2)

                cmdInsert.ExecuteNonQuery()

            End Using

        End Using
    End Sub



    Public Sub updateClientBook(ByVal cName As String, ByVal total1 As Integer, ByVal total2 As Integer)

        Using conn As New OleDbConnection(myGlobals.getDBPath)

            Using cmd As New OleDbCommand("UPDATE " & bookTable & " SET posTeam1 = @p1, posTeam2 = @p2 WHERE CustomerName = @Name", conn)

                conn.Open()

                cmd.Parameters.AddWithValue("@Name", cName)

                cmd.Parameters.AddWithValue("@p1", total1)

                cmd.Parameters.AddWithValue("@p2", total2)

                cmd.ExecuteNonQuery()

            End Using

        End Using

    End Sub