User (Legacy) Posted December 18, 2002 Report Share 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> Link to comment Share on other sites More sharing options...
Software FX Posted December 18, 2002 Report Share 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> > > Link to comment Share on other sites More sharing options...
Recommended Posts
Archived
This topic is now archived and is closed to further replies.