User (Legacy) Posted December 18, 2002 Report Posted December 18, 2002 I have a lot of series in my chart,one point per serie, I want my chart to redirect to another page when the user clic or double clic in the points, but it does not work, my source code is like this: . . . . . ChartFX1.Gallery = SURFACE ChartFX1.Rgb2DBk = RGB(0,0,0) 'Para meter datos a nuestro plano (ver ayuda para mas informacion) 'ChartFX1.OpenDataEx COD_VALUES,unknown,unknown 'ChartFX1.CloseData COD_VALUES '------------------------------------------------------------------ i = 0 do while(i<auxB+auxP) ChartFX1.Series(i+1).Gallery = SCATTER ChartFX1.Series(i+1).MarkerShape = 4 i=i+1 loop i = 0 do while(i<auxP) ChartFX1.Series(i+1+auxB).Gallery = SCATTER ChartFX1.Series(i+1+auxB).MarkerShape = 4 i=i+1 loop ChartFX1.OpenDataEx COD_COLORS,auxB+auxP+1,0 i=0 do while(i<axuB+auxP=1) ChartFX1.Series(i+1).Color = RGB(rojo,verde,azul) ChartFX1.Series(i+1+auxB).Color = RGB(rojo,verde,azul) loop ChartFX1.CloseData COD_COLORS response.write auxB Response.Write auxP '--------------------------------------------------------------------- 'Estas son las propiedades de nuestro mapa: puntos invisibles unidos por linesas y de un ancho # 3. ChartFX1.Chart3D = false 'Desabilitada la 3D '-------------------------------------------------------------------- ChartFX1.Series(0).Gallery = lines 'puntos unidos por lineas ChartFX1.Series(0).Color = rgb(10,30,150) ChartFX1.Series(0).MarkerShape = 0 'sin figura en el punto ChartFX1.Series(0).LineWidth = 3 'ancho linea '-------------------------------------------------------------------- ChartFX1.PointLabels = false 'Sin sus coordenadas ChartFX1.DataEditor = false 'Sin la propiedad de edicion. ChartFX1.Axis(0).Grid = false ChartFX1.Axis(2).Grid = false ChartFX1.Axis(AXIS_x).Min = -120 ChartFX1.Axis(AXIS_x).Max = -86 ChartFX1.Axis(AXIS_y).Min = 12 ChartFX1.Axis(AXIS_y).Max = 33 ChartFX1.Axis(AXIS_X).Visible = False ChartFX1.Axis(AXIS_Y).Visible = False i = 1 do while(i<90) ChartFX1.URL(i) = "\Samples\CfxIE\Internet\DrillSeries2.htm" i=i+1 loop ChartFX1.URLOptions = CHART_URL_JUMP Or CHART_URL_BYSERIES ChartFX1.DblClk CHART_URLCLK,0 '--------------------------------------------------------------------- %> <CENTER> <%= ChartFX1.GetHtmlTag("800","600","Auto","Chart1") %> </CENTER>
Software FX Posted December 18, 2002 Report Posted December 18, 2002 Why are you setting the main type to SURFACE ? This I believe is the problem. Simply change that line to: ChartFX1.Gallery = SCATTER -- FP Software FX Support "omar vargas" <al768775@mail.mty.itesm.mx> wrote in message news:dfS9EnspCHA.2632@webserver1.softwarefx.com... > I have a lot of series in my chart,one point per serie, I want my chart to > redirect to another page when the user clic or double clic in the points, > but it does not work, my source code is like this: > . > . > . > . > . > ChartFX1.Gallery = SURFACE > ChartFX1.Rgb2DBk = RGB(0,0,0) > 'Para meter datos a nuestro plano (ver ayuda para mas informacion) > 'ChartFX1.OpenDataEx COD_VALUES,unknown,unknown > 'ChartFX1.CloseData COD_VALUES > '------------------------------------------------------------------ > i = 0 > do while(i<auxB+auxP) > ChartFX1.Series(i+1).Gallery = SCATTER > ChartFX1.Series(i+1).MarkerShape = 4 > i=i+1 > loop > i = 0 > do while(i<auxP) > ChartFX1.Series(i+1+auxB).Gallery = SCATTER > ChartFX1.Series(i+1+auxB).MarkerShape = 4 > i=i+1 > loop > > ChartFX1.OpenDataEx COD_COLORS,auxB+auxP+1,0 > i=0 > do while(i<axuB+auxP=1) > ChartFX1.Series(i+1).Color = RGB(rojo,verde,azul) > ChartFX1.Series(i+1+auxB).Color = RGB(rojo,verde,azul) > loop > ChartFX1.CloseData COD_COLORS > > response.write auxB > Response.Write auxP > '--------------------------------------------------------------------- > > 'Estas son las propiedades de nuestro mapa: puntos invisibles unidos por > linesas y de un ancho # 3. > ChartFX1.Chart3D = false 'Desabilitada la 3D > '-------------------------------------------------------------------- > ChartFX1.Series(0).Gallery = lines 'puntos unidos por lineas > ChartFX1.Series(0).Color = rgb(10,30,150) > ChartFX1.Series(0).MarkerShape = 0 'sin figura en el punto > ChartFX1.Series(0).LineWidth = 3 'ancho linea > '-------------------------------------------------------------------- > ChartFX1.PointLabels = false 'Sin sus coordenadas > ChartFX1.DataEditor = false 'Sin la propiedad de edicion. > ChartFX1.Axis(0).Grid = false > ChartFX1.Axis(2).Grid = false > ChartFX1.Axis(AXIS_x).Min = -120 > ChartFX1.Axis(AXIS_x).Max = -86 > ChartFX1.Axis(AXIS_y).Min = 12 > ChartFX1.Axis(AXIS_y).Max = 33 > ChartFX1.Axis(AXIS_X).Visible = False > ChartFX1.Axis(AXIS_Y).Visible = False > > i = 1 > do while(i<90) > ChartFX1.URL(i) = "\Samples\CfxIE\Internet\DrillSeries2.htm" > i=i+1 > loop > ChartFX1.URLOptions = CHART_URL_JUMP Or CHART_URL_BYSERIES > ChartFX1.DblClk CHART_URLCLK,0 > > '--------------------------------------------------------------------- > > > %> > <CENTER> > <%= ChartFX1.GetHtmlTag("800","600","Auto","Chart1") %> > </CENTER> > >
Recommended Posts
Archived
This topic is now archived and is closed to further replies.