A mi me llego bien. Y lo guarde...
SaludosCarlosMag
Date: Thu, 23 Aug 2007 15:11:05 -0300From: [EMAIL PROTECTED]: [EMAIL
PROTECTED]: [vbusers] Consulta de referencia cruzadasGenteme llego sin el
proyecto atachado, no se si lo elimino el servidor, si o llego avisen y lo
publico en algun ftp.graciasDaniel Calvin
El día 23/08/07, Daniel Calvin <[EMAIL PROTECTED]> escribió:
Hola GenteConstri un ejemplo de un componente que lo hace por codigo, no
encontre el componente que hice hace unos años....se usa asi:' Una consulta que
te trae los valore agrupados y con la operacion, suma, cuenta, lo que quieras
resuelta r.Open "SELECT Articulo, Talle, Sum(Cantidad) AS SumaDeCantidad
FROM Articulos GROUP BY Articulo, Articulos.Talle", c, adOpenStatic
'Componente nuevo Dim cub As New DACData.Cubo 'recorset
recuperado desde la consulta de agrupacion Set cub.RecordsetSource = r
'Agregas la parte fija, en tu caso articulo ' Pueden ser tantos campos como
quieras cub.PivotFields.Add "Articulo" ' seteas la columna cuyo
valor son los titulos, en tu caso talle Set cub.ColumnField =
r.Fields("Talle") 'seteas la columna que se usara para totalizar, la
interseccion digamos Set cub.sumaField = r.Fields("SumaDeCantidad") '
genera un recorset como el que vino en el ejemplo anterior del access. Set
cubRecordset = cub.GetCubo() r.Close c.CloseProbalo, te adjunto el
ejemplo completo, funciona con cualquier motor.SaludosDanielPD: se puede
optimizar mucho, si queres mejorarla mirala y te digo como.
El día 23/08/07, Listas Mug <[EMAIL PROTECTED]> escribió:
Upss…no pense que se iba a armar tal despelote, por lo que veo no es tan fácil,
el mayor problema que veo es que en este ejemplo, la columna talle puede
variar, es mas, varia constantemente, no siempre son los mismos valores, estoy
intentando algo con código, y basándome en lo que me enviaron, También estaría
bueno la opción que me dio Viviana, tenes algún ejemplo?
Gracias a todos
ESteban
De: [email protected] [mailto:[EMAIL PROTECTED] En nombre de Report System -
VivianaEnviado el: Jueves, 23 de Agosto de 2007 12:39 a.m.Para: vbusers List
MemberAsunto: [vbusers] Consulta de referencia cruzadas
Si te sirve, en Crystal es muy fácil. Avisame y te armo un ejemplo.
Saludos
Viviana
----- Original Message -----
From: Listas Mug
To: vbusers List Member
Sent: Wednesday, August 22, 2007 4:19 PM
Subject: [vbusers] Consulta de referencia cruzadas
Hola listeros
Tengo que hacer una consulta de referencias cruzadas en Visual,
alguien tiene idea como hacerla???
Tengo los siguientes datos
Articulo talle cantidad
1000 40 1
1000 41 2
1001 39 1
1001 38 3
Y tengo que llegar a esto:
Artículo 38 39 40
41
1000 1
2
1001 3 1
Esto se puede hacer en access, pero no le encuentro la vuelta en visual
Desde ya muchas gracias
Saludos, Esteban
> > Desde ya muchas gracias> Saludos, ESteban> > >
Comunícate al instante con Windows Live Messenger Windows Live Messenger--
Daniel A. CalvinCooperator Team Memberhttp://www.cooperator.com.arMicrosoft
Certified Professional -- Daniel A. CalvinCooperator Team
Memberhttp://www.cooperator.com.arMicrosoft Certified Professional
_________________________________________________________________
Descubre Live.com - tu propia página de inicio, personalizada para ver
rápidamente todo lo que te interesa en un mismo sitio.
http://www.live.com/getstarted
