Ayuda con insertar registros !!!!
Bueno la pregunta es la sgte tengo lo sgte
Do While Not Eof()
If Not EoF()
If lcCodRegion <> CurRegion.CodRegion
ThisForm.lstCodReg.AddlistItem(CurRegion.CodRegion)
If lcNomRegion <> CurRegion.NomRegion
ThisForm.lstNomReg.AddlistItem(CurRegion.NomRegion)
EndIf
EndIf
lcCodRegion = CurRegion.CodRegion
lcNomRegion = CurRegion.NomRegion
Skip
EndIf
EndDo
Bueno en este codigo (que aun no se si se vera ordenado para ustedes cuando lo lean ) estoy filtrando un cursor el cursor que contiene los datos de una tabla se llama region y muestro los codigos de region y nombres de region en listbox diferentes, la pregunta como inserto 1 por 1 a una tabla de nombre ComPrue, pero que los inserte al momento de filtrar el primero o al momento de cargar el primero en el listbox pase automaticamente a la tabla que deseo
Espero me haya explicado bien
Muchas Gracias
Cristophilin
Do While Not Eof()
If Not EoF()
If lcCodRegion <> CurRegion.CodRegion
ThisForm.lstCodReg.AddlistItem(CurRegion.CodRegion)
If lcNomRegion <> CurRegion.NomRegion
ThisForm.lstNomReg.AddlistItem(CurRegion.NomRegion)
EndIf
EndIf
lcCodRegion = CurRegion.CodRegion
lcNomRegion = CurRegion.NomRegion
Skip
EndIf
EndDo
Bueno en este codigo (que aun no se si se vera ordenado para ustedes cuando lo lean ) estoy filtrando un cursor el cursor que contiene los datos de una tabla se llama region y muestro los codigos de region y nombres de region en listbox diferentes, la pregunta como inserto 1 por 1 a una tabla de nombre ComPrue, pero que los inserte al momento de filtrar el primero o al momento de cargar el primero en el listbox pase automaticamente a la tabla que deseo
Espero me haya explicado bien
Muchas Gracias
Cristophilin
