Visual Basic

Private Sub Form1_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown
       Try
           Dim cn As New OdbcConnection("dsn=PHOENIXDB;uid=SYSDBA;pwd=masterkey;")
           Dim mystring As String = "Select * from VW_SSN_REGIONI"
           Dim cmd As OdbcCommand = New OdbcCommand(mystring)
           Dim daSSNregioni As New OdbcDataAdapter

           Dim dsSSNregioni As New DataSet
           cn.Open()

           daSSNregioni.SelectCommand = cmd
           daSSNregioni.SelectCommand.Connection = cn
           daSSNregioni.Fill(dsSSNregioni, "SSN_REGIONI")
           Me.DataGridViewX1.DataSource = dsSSNregioni

          cn.Close()
       Catch ex As NullReferenceException
           MsgBox("Error: " & ex.Source & ": " & ex.Message, MsgBoxStyle.OkOnly, "Connection Error !!")
       Catch ex As Exception
           MsgBox("Error: " & ex.Source & ": " & ex.Message, MsgBoxStyle.OkOnly, "Connection Error !!")
       End Try

   End Sub

Attempted to read or write protected memory. This is often an indication that other memory is corrupt in vb.net

.Text = m.ResponseDate.ToString("MM/dd/yy H:mm") 

.Text = DateTime.ParseExact(m.ResponseDate, "MM/dd/yy H:mm", CultureInfo.InvariantCulture)

Using context As New CRMContext()
Dim pResults As New CRM_MESSAGES With
  {
  .Subject = sCM.m_Contact_Subject
  }
context.SaveChanges()

Public Class CRMContext
        Inherits DbContext

        Public Sub New()
            MyBase.New("DefaultConnection")

            Database.SetInitializer(New CreateDatabaseIfNotExists(Of CRMContext))
            Entity.Database.SetInitializer(Of CRMContext)(Nothing)

        End Sub

        Public Property CRM_MESSAGES As DbSet(Of CRM_MESSAGES)

        Public Overrides Function SaveChanges() As Integer

            ChangeTracker.DetectChanges()

            'Call IPrepareForSave on entities that support it...
            Return MyBase.SaveChanges()

        End Function