Autor Tema: pasar de ADODC a codigo directo  (Leído 1376 veces)

0 Usuarios y 1 Visitante están viendo este tema.

gasafonso

  • Megabyte
  • ***
  • Mensajes: 175
  • Reputación: +4/-10
    • Ver Perfil
pasar de ADODC a codigo directo
« en: Octubre 24, 2014, 02:58:05 pm »
Buenas tardes amigos del foro, alguien me puede decir como puedo pasar esto a coneccion directa  ?

Código: (VB) [Seleccionar]
Dim criterio As String

If Text1.text >= 100 Then
    End
End If
criterio1 = "SELECT * FROM TBCAJA where fecha=#" & Format(DTPicker1.Value, "DD/MM/yyyy") & "#"
'CRITERIO = "fecha =" & Format(DTPicker1.Value, "dd/mm/YYYY") & ""
'dscaja.Recordset.FindFirst (CRITERIO)
dscaja.Recordset.Edit
dscaja.Recordset!importeinicial = txtImporteInicial
dscaja.Recordset!comparada = Text3.text 'dscaja.Recordset!trial + 1
dscaja.Recordset.Update
dscaja.Refresh

FormMenu.Timer1.Enabled = False
'Unload Me
Date = Format(Date, "DD/MM/YYYY")
'Call cargarCumples
Call cargarVacunasPendientes

gracias
« última modificación: Octubre 24, 2014, 03:01:02 pm por gasafonso »

YAcosta

  • Moderador Global
  • Exabyte
  • *****
  • Mensajes: 2853
  • Reputación: +160/-38
  • Daddy de Qüentas y QüeryFull
    • Ver Perfil
    • Personal
Re:pasar de ADODC a codigo directo
« Respuesta #1 en: Octubre 24, 2014, 03:11:59 pm »
Lo que normalmente yo hago es esto:

Si ya tengo el criterio para modificar, por ejemplo todos los registros con ID = 10 (seguro hay uno solo) o todos los registros en una fecha especifica (me parece que es tu caso) no necesito hacer previamente ningún select cuando de "codigo directo" se trata, sino directamente modifico el (los) registros segun el criterio.

Código: (VB) [Seleccionar]
sql = "UPDATE TBCAJA SET importeinicial = " & txtImporteInicial& ", comparada = " & Text3 & " WHERE MiCampoFecha = #" & TuCampoFecha & "#"
dB.Execute sql, adCmdText '<-- esta linea es la que graba

Saludos
Me encuentras en YAcosta.com

gasafonso

  • Megabyte
  • ***
  • Mensajes: 175
  • Reputación: +4/-10
    • Ver Perfil
Re:pasar de ADODC a codigo directo
« Respuesta #2 en: Octubre 24, 2014, 03:14:42 pm »
Ah ok y como abris y cerras la BD a traveZ de una clase ?

YAcosta

  • Moderador Global
  • Exabyte
  • *****
  • Mensajes: 2853
  • Reputación: +160/-38
  • Daddy de Qüentas y QüeryFull
    • Ver Perfil
    • Personal
Re:pasar de ADODC a codigo directo
« Respuesta #3 en: Octubre 24, 2014, 03:18:54 pm »
A través de una clase no se, a través de un modulo si:
http://vb6firebird.com/blog/?p=274


Saludos
Me encuentras en YAcosta.com

raul338

  • Terabyte
  • *****
  • Mensajes: 894
  • Reputación: +62/-8
  • xD fan!!!!! xD
    • Ver Perfil
    • Raul's Weblog
Re:pasar de ADODC a codigo directo
« Respuesta #4 en: Octubre 24, 2014, 06:02:49 pm »
Podes pegarle una ojeada a este tema http://leandroascierto.com/foro/index.php?topic=2775.0

gasafonso

  • Megabyte
  • ***
  • Mensajes: 175
  • Reputación: +4/-10
    • Ver Perfil
Re:pasar de ADODC a codigo directo
« Respuesta #5 en: Octubre 24, 2014, 06:49:14 pm »
Siii pero para Access 97 necesito, es mas necesito algo que me simplifique las cosas

Saludos