Solo lectura en Gridcontrol

La verdad no encontré para que todo el control sea solo en modo lectura, pero puedes colocar cada columna en forma independiente en modo lectura de la siguiente forma.

GridControl1(1).ReadOnly = True

donde 1 es en numero de la columna, o también puedes poner el nombre de la columna.

Si quieres que toda la tabla sea en modo lectura, pon esto.


 For NCol = 0 To GridControl1.Columns.Count - 1
            GridControl1.Columns(NCol).ReadOnly = True
Next

Modificar app.config - Cadena de Conexión

Para aclarar estoy usando Visual Basic 2010 y WPF, sin embargo el WPF no interviene en el código que utilizare, así que los que utilizan Formularios no tendrían problema alguno.

Para empezar abrimos el app.config.

Añadan una conexion con el Nombre "CadenaConexion", el connectionString coloquen lo que sea, al final va ser modificado por nuestra aplicacion, y en providen name pueden colocar "System.Data.SqlClient" para los que utilizan Sql Server o "MySql.Data.MySqlClient" para los que utlizan MySQL, al final tampoco importa mucho ya que también sera modificado por nuestra aplicacion.

Crea una ventana o formulario con una caja de texto (TextBox) con el nombre o name "TBcadena" y un Botón con el nombre de "BTActualizar", entra al evento Clic del botón y coloca este código.

Como veras el boton esta llamando a un procedimiento llamado CambiarCNX y donde se le envía un parámetro de tipo string, en este caso le estamos pasando el contenido del TextBox.

El codigo del procedimiento es este.

Ya estaría, si quieres verificar si resulto, porque muchos ESTOY SEGURO que al fijarse en su app.config no ven cambio alguno, les comento que al momento de ejecutar crea su propio app.config y esta dentro del la carpeta bin o debug.

Y NO precisamente se llama app.config, tiene el nombre del proyecto con la extensión vshost.exe (no es un EXE es un XML) y se puede abrir con el Bloc de Notas o NotePad

Listo, esito sería.

---------------------------------------------------------------------------------------

Yo no sabia pero me entere, así como nosotros podemos abrir con un Bloc de Notas, otros también podrían hacerlo no te parece, podrian ver nuestro usuario, lo peor ver la contraseña de acceso.

Para que te calmes tambien se puede guardar encriptado de la siguiente forma.

Este es el código de procedimiento CambiarCNX, ves alguna diferencia...

Exacto, al final aumente una llamada a otro procedimiento, el que me encripta los datos y su código es este.

Ahora si, fíjate tu supuesto app.config que en realidad tiene otro nombre y se encuentra en la carpeta Bin o Debug. Solo veras garabatos.

Ahí te ves.....

Visual Basic 2008 y Access 2007

Empezando con lo mas básico en Visual.net, este es el código fuente de como conectar Access 2007 con VB 2008.
----------------------------------------------------------------

Imports System.Data.OleDb

Public Class Form1

Dim dbConnection As Data.OleDb.OleDbConnection
Dim dbDataSet As Data.DataSet
Dim dbDataAdapter As Data.OleDb.OleDbDataAdapter

Dim ConsultaSQL As String
Dim CadenaConexion, RutaNombreBD As String 'Para los que estan criticando, ya se puede declarar variables de esta forma en VB2008

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ConsultaSQL = TextBox1.Text
'Application.StartupPath obtiene la ruta de nuestra carpeta donde se encuentra el exe
'como todavia estamos desarrollando y probando nos llevara a la carpeta DEBUG
RutaNombreBD = Application.StartupPath & "\Base2007.accdb"

'REALIZANDO LA CONEXION
'CadenaConexion = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & ArchivoDatos 'para access 2003
CadenaConexion = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & _
RutaNombreBD & ";Jet OLEDB:Database Password=;"
Try
dbConnection = New Data.OleDb.OleDbConnection(CadenaConexion)
Catch x As Exception
MessageBox.Show("Error al crear la conexión:" & vbCrLf & x.Message)
Exit Sub
End Try
dbConnection.Open()

'CREANDO DATASET (Crea una BD vacia en memoria hasta donde entendi)
dbDataSet = New Data.DataSet()

'CREANDO DATAADAPTER (Nos permite acceder a los datos físicos de la base de datos)
'sera como nuestro puente entre la DB real y el DATASET
dbDataAdapter = New Data.OleDb.OleDbDataAdapter(ConsultaSQL, dbConnection)

'CommandBuilder no se usa nada más pasar comandos SQL al DataAdapter
'y este pueda añadir, modificar y eliminar datos de la DB.
Dim commandBuilder As New Data.OleDb.OleDbCommandBuilder(dbDataAdapter)
dbDataAdapter.MissingSchemaAction = MissingSchemaAction.AddWithKey 'Esta linea es para no tener problemas con la clave principal

'Llenamos el objeto DataSet con los datos del DataAdapter
'es como crear una nueva tabla virtual dentro el DATASET
'El 2do parametro es el nombre que colocamos a nuestra nueva tabla virtual
dbDataAdapter.Fill(dbDataSet, "TablaX")

'MOSTRANDO LOS DATOS EN UNA GRILLA
DataGridView1.DataSource = dbDataSet
DataGridView1.DataMember = "TablaX"
DataGridView1.Refresh()
End Sub
End Class

y si le gusta la comodidad, aqui les dejo todo el código fuente para descargarse.
http://grupos.emagister.com/ficheros/vcruzada?idGrupo=1024&idFichero=223406