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
          nw.DeleteObject(resCust)
        Case EntityState.Modified
          resCust.CompanyName = Cust.CompanyName
        Case EntityState.Added
          nw.Customers.AddObject(Cust)
      End Select
      nw.SaveChanges()
    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 http://blog.learningtree.com/tag/ui/.

comments powered by Disqus

Featured

  • Python in VS Code Adds Data Viewer for Debugging

    The January 2021 update to the Python Extension for Visual Studio Code is out with a short list of new features headed by a data viewer used while debugging.

  • GitHub Ships Enterprise Server 3.0 Release Candidate

    It's described as "the biggest ever change to Enterprise Server," with improvements to Actions, Packages, mobile, security and more.

  • Attacks on .NET Apps Grow in Number, Severity, Says Security Firm

    .NET apps were found to have more serious vulnerabilities and suffer more attacks last year, according to data gathered by Contrast Labs.

  • Microsoft Opens Up Old Win32 APIs to C# and Rust, More Languages to Come

    Microsoft is opening up old Win32 APIs long used for 32-bit Windows programming, letting coders use languages of their choice instead of the default C/C++ option.

Upcoming Events