erro ao exibir gráfico criado pelo Chart Director

[Marcio POG 0]

Olá pessoal, estou usando o componente Chart Director para gerar um gráfico.

 

Quando eu rodo o código a seguir isoladamente, ele é gerado. Agora quando eu tento inserir esse código na minha página, a imagem do gráfico não é exibida.

 

Como que eu faço pessoal? Muito obrigado!

 

<%		
		  Set cd = CreateObject("ChartDirector.API")
' Dados para criar o gráfico de barras
data = Array(6.5, 4.5, 2.7, 3.7, 3.4, 5.3, 10.0, 6.5, 4.5, 2.7, 3.7, 3.4, 5.3, 10.0)
labels = Array("Jan", "Fev", "Mar", "Abr", "Mai", "Jun", "Dez", "Jan", "Fev", "Mar", "Abr", "Mai", "Jun", "Dez")
' Criar objeto para gráfico tipo XYChart do tamanho 400 x 360 pixels
Set c = cd.XYChart(450, 360)
' Define uma área de Gráfico de (60, 40) e do tamanho de 280 x 260 pixels
Call c.setPlotArea(60, 40, 300, 260)
' Configurar o eixo de acordo com o parâmetro de Entrada
If Request("img") = "0" Then
Call c.addTitle("No Axis Extension", "arial.ttf", 8)
ElseIf Request("img") = "1" Then
Call c.addTitle("Top/Bottom Extensions = 0/0", "arial.ttf", 8)
' Reservar margem de 20% no topo da área de gráfico com auto-scaling
Call c.yAxis().setAutoScale(0, 0)
ElseIf Request("img") = "2" Then
Call c.addTitle("Top/Bottom Extensions = 0.2/0.2", "arial.ttf", 8)
' Reservar margem de 20% nas partes superior e inferior da área de gráfico com auto-scaling
Call c.yAxis().setAutoScale(0.2, 0.2)
ElseIf Request("img") = "3" Then
Call c.addTitle("Axis Top Margin = 15", "arial.ttf", 8)
' Reservar 15 pixels no topo da área de gráfico
Call c.yAxis().setMargin(15)
Else
Call c.addTitle("Estatística da Avaliação", "arial.ttf", 8)
' Configurar eixo y para escala de -5 a 10, com ticks a cada 5 unidades
Call c.yAxis().setLinearScale(0, 100, 50, 10)
End If
' Configurar os rótulos no eixo x
Call c.xAxis().setLabels(labels)
' Acrescentar uma camada de barras coloridas usando os dados. Usar uma borda 3D de 1pixel para as barras.
Call c.addBarLayer3(data).setBorderColor(-1, 1)
' Gerar o gráfico
Response.ContentType = "image/png"
Response.BinaryWrite c.makeChart2(cd.PNG)  %>

Olá pessoal, estou usando o componente Chart Director para gerar um gráfico.

 

Quando eu rodo o código a seguir isoladamente, ele é gerado. Agora quando eu tento inserir esse código na minha página, a imagem do gráfico não é exibida.

 

Como que eu faço pessoal? Muito obrigado!

 

<%		
		  Set cd = CreateObject("ChartDirector.API")
' Dados para criar o gráfico de barras
data = Array(6.5, 4.5, 2.7, 3.7, 3.4, 5.3, 10.0, 6.5, 4.5, 2.7, 3.7, 3.4, 5.3, 10.0)
labels = Array("Jan", "Fev", "Mar", "Abr", "Mai", "Jun", "Dez", "Jan", "Fev", "Mar", "Abr", "Mai", "Jun", "Dez")
' Criar objeto para gráfico tipo XYChart do tamanho 400 x 360 pixels
Set c = cd.XYChart(450, 360)
' Define uma área de Gráfico de (60, 40) e do tamanho de 280 x 260 pixels
Call c.setPlotArea(60, 40, 300, 260)
' Configurar o eixo de acordo com o parâmetro de Entrada
If Request("img") = "0" Then
Call c.addTitle("No Axis Extension", "arial.ttf", 8)
ElseIf Request("img") = "1" Then
Call c.addTitle("Top/Bottom Extensions = 0/0", "arial.ttf", 8)
' Reservar margem de 20% no topo da área de gráfico com auto-scaling
Call c.yAxis().setAutoScale(0, 0)
ElseIf Request("img") = "2" Then
Call c.addTitle("Top/Bottom Extensions = 0.2/0.2", "arial.ttf", 8)
' Reservar margem de 20% nas partes superior e inferior da área de gráfico com auto-scaling
Call c.yAxis().setAutoScale(0.2, 0.2)
ElseIf Request("img") = "3" Then
Call c.addTitle("Axis Top Margin = 15", "arial.ttf", 8)
' Reservar 15 pixels no topo da área de gráfico
Call c.yAxis().setMargin(15)
Else
Call c.addTitle("Estatística da Avaliação", "arial.ttf", 8)
' Configurar eixo y para escala de -5 a 10, com ticks a cada 5 unidades
Call c.yAxis().setLinearScale(0, 100, 50, 10)
End If
' Configurar os rótulos no eixo x
Call c.xAxis().setLabels(labels)
' Acrescentar uma camada de barras coloridas usando os dados. Usar uma borda 3D de 1pixel para as barras.
Call c.addBarLayer3(data).setBorderColor(-1, 1)
' Gerar o gráfico
Response.ContentType = "image/png"
Response.BinaryWrite c.makeChart2(cd.PNG)  %>

 

achei a resposta.. se alguém passar pelo mesmo problema:

 

<HTML>

<BODY>

 

<h1>Hello World!</h1>

<p>Hi, this is my first web page with ChartDirector charts.</p>

 

<IMG SRC="http://aaa.bbb.ccc.ddd/aspdemo/simplebar.asp">

 

More HTML elements ......

 

</BODY>

</HTML>

[xanburzum 169]

ele gera algum erro ???