Ver Mensaje Individual
  #1 (permalink)  
Antiguo 08/07/2008, 09:22
pabje
 
Fecha de Ingreso: marzo-2008
Ubicación: Posadas Misiones Argentina
Mensajes: 480
Antigüedad: 16 años, 2 meses
Puntos: 1
Problema con data grid

Hola amigos del foro

Solo queria de su ayuda para resolver este problema


Tengo un data grid que se encuentra conectada a una tabla de una base de datos de Access 2003(lo conecto con ADO). La Tabla ya tiene valores cargados.
Ademas el data grid tiene habilitadas(true) las propiedades donde directamente yo puedo modificar las celdas, borrar cualquier celda.

La Idea es poder modificar los valores de los campos de la tabla.

Para ello tengo un procedimiento para control de errores .
El mismo se activa con el evento beforecolupdate del data grid.

El procedimiento me controla que ingrese una fecha valida(fecha corta de Access, sin letras o espacios en blanco o cualquier simbolo raro).

Tambien controla que no deje en blancos campos obligatorios o claves.

El problema es que no anda bien , porque en vez de controlar los valores que ingreso en cada celda del data grid, controla los valores anteriores que ya estaban grabados en la tabla de la base de Datos de Access.

Entonces nunca encuentra un error(fechas mal ingresadas, campos en blanco)

A continuacion dejo el algoritmo

Cita:
Private Sub DataGrid1_BeforeColUpdate(ByVal ColIndex As Integer, OldValue As Variant, Cancel As Integer)
Select Case ColIndex = 3
Case 0 ' suponemos que la 1ª columna es la de fecha
If Not IsDate(DataGrid1.Text) Then
MsgBox "Introduzca una fecha válida"
Adodc1.Recordset.CancelUpdate
End If
Case 1, 2, 3 ' las columnas 2, 3 y 4 son obligatorias
If IsNull(DataGrid1.Text) Then
MsgBox "El campo no puede estar vacío"
Adodc1.Recordset.CancelUpdate
End If

Le agradeceria mucho si me pueden ayudar.

Gracias