ASP.NET Test-Drive: Listing 2.

The UpdateMethod property.

Public Sub UpdateCustomer(Cust As Customer)
  Using nw As New NorthwindEntities
    Dim resCust = (From c In nw.Customers
                     Where c.CustomerID = Cust.CustomerID
                     Select c).FirstOrDefault
    If resCust IsNot Nothing Then
      Select Case Cust.EntityState
        Case EntityState.Deleted
        Case EntityState.Modified
          resCust.CompanyName = Cust.CompanyName
        Case EntityState.Added
      End Select
    End If
  End Using
End Sub

About the Author

Peter Vogel is a system architect and principal in PH&V Information Services. PH&V provides full-stack consulting from UX design through object modeling to database design. Peter tweets about his VSM columns with the hashtag #vogelarticles. His blog posts on user experience design can be found at

comments powered by Disqus


Subscribe on YouTube

Upcoming Events