_da_Access = New OleDb.OleDbDataAdapter("SELECT * FROM workdata WHERE Asp_ext" & _
    "= '" & Me.txtExtension.Text & " ' ", ConnAccess)
            Try
                _da_Access.Fill(_ds_Access, "workdata")
                _dt = _ds_Access.Tables("workdata")
                _dv = New DataView(_dt)
                _cm = BindingContext(_dv)
            Catch ex As System.Exception
                MsgBox(ex.Message)
                Exit Sub
            End Try
            DataGrid2.DataSource = _dv