euge092598
asked on
"RDORESULTSETS""
When I asigne a Rdo Resultset variable data,this data is lost when I excecute a other function . Why do I loos the assigned data and how I can't lose it?
Sub Consult()
Dim Rs As rdoResultset
Dim clsEntins as New CLAENTI
Set Rs = clsEntins.metLeerEntins("s p_SEL_Uc_E NT_INSC")
If Not(Rs.EOF And Rs.BOF)
TxtCoenti.text = Trim$(Rs!EIN_COENTI)
CboRazSoc.text=BUSCAR(RS!E IN_CODIGO)
TxtEdad.text=TRIM$(RS!EDAD ) 'I loose RS!EDAD Why??
EndIf
end Sub
Thank you very much, Sorry my English I speak spanish
Sub Consult()
Dim Rs As rdoResultset
Dim clsEntins as New CLAENTI
Set Rs = clsEntins.metLeerEntins("s
If Not(Rs.EOF And Rs.BOF)
TxtCoenti.text = Trim$(Rs!EIN_COENTI)
CboRazSoc.text=BUSCAR(RS!E
TxtEdad.text=TRIM$(RS!EDAD
EndIf
end Sub
Thank you very much, Sorry my English I speak spanish
if the buscar function opens a rdo recordset on the same connection the previous recordset is closed. This is by design. If you want to have two recordsets open at the same time setup another connection.
ASKER
I don't open a new RdoResultsets in the buscar function and I don't know about the getchunck() function. Please can you response
you need to provide more info, what type of DB, what are the field types, what is the select statement?
ASKER
I use SQL SERVER DB, and "buscar function" opens a new rdoresultset
You tell me I loose the first one, How can I preserve that data?
You tell me I loose the first one, How can I preserve that data?
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Adjusted points to 160
If it is try removing the Trim$().
If it is SQL server and a TEXT field, then you may need to use getchunk, appendchunk functions.