
27/04/2004, 19:22
|
 | | | Fecha de Ingreso: octubre-2003 Ubicación: Puerto Montt
Mensajes: 3.667
Antigüedad: 21 años, 5 meses Puntos: 11 | |
mas menos asi:
dim rsChart as new Adodb.recordset
dim strConsulta as string
strConsulta="select campoEjeX, campo2, campo3, ... from tabla ...."
rsChart.open strConsulta, conexion
if not strConsulta.eof then
msgraph1.recordsource=rsChart
end if
- conexion es un objeto Adodb.connection abierto
- msgraph1 es un objeto mschart incrustado en el form
- campoEjeX debe ir primero en la consulta pues serán los valores del eje X.
- a la propiedad recordsource se le asigna un recordset ADO
__________________ Dedicado a proyectos web, actualmente desarrollando un sistema de diseño de flyers online muy fácil de usar. |