• Sábado 14 de Diciembre de 2019, 08:51

Autor Tema:  Base de datos y consultas  (Leído 1380 veces)

Mombasa

  • Nuevo Miembro
  • *
  • Mensajes: 6
    • Ver Perfil
Base de datos y consultas
« en: Martes 9 de Abril de 2013, 14:32 »
0
Buenas...una consulta: tengo 2 msflexgrid en un formulario. En el primero, una vez cargados los datos los guardo en una base de datos. El segundo se va cargando automáticamente, ya que suma y muestra los totales de los datos tipeados en el primero.
Pero no logro que estos últimos se graben en una base de datos. a continuación, el código para la primer base: (Cabe destacar que la segunda base acumula los totales de: Min, Gol, Puntaje, etc.)
Muchas gracias.

Código: Visual Basic
  1. Private Sub cmdAddEntry_Click()
  2.     'agrego
  3.    With Data1.Recordset
  4.         .AddNew
  5.         !Partido = Text1.Text
  6.         !Fecha = DTPicker1
  7.         !Min = Text2(1).Text
  8.         !Gol = Text2(2).Text
  9.         !Ptje = Text2(4).Text
  10.         .Update
  11.     End With
  12.    
  13.     Data1.Refresh
  14.  
  15. Data1.DatabaseName = App.Path & "\Estadis.mdb"
  16.        
  17. Data1.RecordSource = "select Min,Gol,Ptje from Datos order by Id"
  18.  
  19. end sub
  20.  
  21.