none
DAO - Intento de Inner Join Dinámico. RRS feed

  • Pregunta

  •  


    Hola,



    Estoy Intentando Crear Un Inner Join Dinámico de la Siguiente Forma:


    -> Set Data1.Recordset = dbBaseDatos.OpenRecordset("SELECT * FROM clientes INNER JOIN guias ON clientes.dni = guias.dniclient WHERE guias.dniclient = '" & DniActual & "' ", dbOpenDynaset)

    En la Variable DniActual Guardo El Dni del Registro Actual de Mi Tabla Clientes.   

    Esta Consulta, Pese a Funcionar Perfectamente, No Permite Guardar las Modificaciones en las Pertienentes Tablas (clientes y guias).

     


    Creo haber Leído que 1 Sólo Control Data, Evidentemente Usado para Pasar Los Registros del Recordset Resultante, No Puede Ser Lo Suficientemente Dinámico como para Actualizar, en el caso de que modifique algún campo de algún registro del recordset resultante, las 2 Tablas que yo en mi caso utilizo para Mi consulta INNER JOIN.

    Aparte de Utilizar 2 Controles Data, ¿Hay Alguna Forma de Poder Actualizar Todas las Tablas de la Consulta en Cuestión a Partir del Recordset Resultante?. En Caso Contrario, Qué Sería lo Más Aconsejable?.


    Grax.

    sábado, 23 de julio de 2011 0:01

Todas las respuestas

  • Hola
    Imagino que desea cambiar los datos de las Guías, si es así una idea sería la de colocar las guías de un determinado cliente en una grid separada. En esta grid si podrías hacer cambios y pasar los cambios a las tablas inherentes. Para estos casos lo mejor es utilizar código. Yo personalmente recupero registros y los coloco en un MSHFlexGrid teniéndolos en la cuadricula puedo determinar cuándo se hace un cambio, eliminación o agregación. Posteriormente detecto el estado de cada fila y procedo a ejecutar el código correspondiente
    Saludos
    CarloCF
    sábado, 30 de julio de 2011 4:05
  •  

    Hola,

     

    Pero la Intención es que el Usuario No Tenga que Modificar Datos del Paciente Entrando en 1 FlexGrid o DataGrid o DBGrid.

     

    Ya lo Tengo Resuleto, La Información del Paciente o de Una Visita las Modifico En el Mismo Formulario.

    - Ahora Mismo Hago Esto:

       
            Data2.Recordset.Edit
           
            Data2.Recordset.Fields("iso").Value = Combo9.Text
            Data2.Recordset.Fields("nfactura").Value = Text26.Text
            Data2.Recordset.Update
            Data2.Refresh
            MsgBox "LOS DATOS HAN SIDO GUARDADOS CON EXITO"

     

    Lo Bueno es que El Recordset del Control Data2 es Un Dynaset Resultante de 1 INNER JOIN de S.Q.L. y Lo Estoy Actualizando Bien en la Misma Consulta D.A.O.

    -> Si que Estoy Usando Un Grill de Esos para Esojer 1 Determinado Producto para mis Facturas  (+1 ComboBox que Se Mueve Encima del Tipo de Grid Clicado).

     

    Como Puedes Ver No Eres el Único Kpo, Hamijo.

    S2

     


    Dios ha muerto. Parece que lo mataron los hombres.
    lunes, 1 de agosto de 2011 15:06