i try to put inside a collection another, and i only refers it selft:
rset = $conexion.Exec("SELECT * FROM alm_despacho WHERE
cod_despacho = '" & cod_despacho & "'")
If rset.Available Then
For Each rset
columnas = New Collection(gb.IgnoreCase)
columnas.Add(rset!cod_despacho), "cod_despacho")
columnas.Add(rset!fecha, "fecha")
cod_contenido = rset!cod_contenido
rsetd = $conexion.Exec("SELECT * FROM
alm_despacho_producto WHERE cod_contenido = '" & cod_contenido & "'")
filasdet = New Collection(gb.IgnoreCase)
For Each rsetd
columnasdet = New Collection(gb.IgnoreCase)
columnasdet.Add(rsetd!cod_producto, "cod_producto")
columnasdet.Add(rsetd!can_producto, "can_producto")
columnasdet.Add(rsetd!mon_precio, "mon_precio")
filasdet.Add(columnas, rsetd!cod_contenido) ' el
codigo de producto es el indice! ja soy el mejor
Next
columnas.Add(filasdet, "cod_contenido")
filas.Add(columnas, rset!cod_despacho)
Next
return filas
why the second collection object have the same content (and referst to
same) firts collection object?
Lenz McKAY Gerardo (PICCORO)
http://qgqlochekone.blogspot.com
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
