Jump to content
Software FX Community

URL


User (Legacy)

Recommended Posts

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

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

Archived

This topic is now archived and is closed to further replies.

×
×
  • Create New...