Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Rafael ASP

Gráficos no asp

Recommended Posts

Esta é PureAspGraph , onde você consegue fazer gráficos sem precisar de COM+, existem varios componentes disponiveis tambem.Com você faz barra de gráficos vertical e horizontal com esta classe ASP . Caracterizando: vertical texto, os dados de arrays, os dados do recordset.

 

Você não precisa instalar nada no servidor, uma vez que esse código é puro ASP! Muito fácil de usar e completamente gratuito. Download http://www.stigc.dk/redirect.asp?download=...ureAspGraph.zip

 

O código para este exemplo

 

 

<%
Dim a, b
Dim h, i, j, k, l

a = Array("Denmark", "Germany", "Sweden", "Norway", "France", "Italy", "Iceland", "Belgium", "Greenland")
b = Array(1490, 1007, 64, 1938, 1550, 1890, 721, 554, 450) 

h = Array(1225, 1299, 687, 1571, 0, 1581, 1148, 772, 1295)
i = Array(367, 457, 712, 1244, 1136, 877, 1778, 1571, 75)
j = Array(339, 1486, 44, 249, 367, 694, 1043, 1875, 117)
k = Array(1622, 647, 784, 1612, 784, 174, 1600, 1114, 396)
l = Array(1785, 1059, 91, 305, 112, 221, 677, 836, 156)

Dim objGraph
Set objGraph = New PureAspGraph
Call objGraph.setTitle("Demonstracao")

'Adiciona os dados 
Call objGraph.setData(a, b)
Call objGraph.addData(h)
Call objGraph.addData(i)
Call objGraph.addData(j)
Call objGraph.addData(k)
Call objGraph.addData(l)

'Adiciona a descricao
Call objGraph.addLabel("Data 1")
Call objGraph.addLabel("Data 2") 
Call objGraph.addLabel("Data 3")
Call objGraph.addLabel("Data 4")
Call objGraph.addLabel("Data 5")
Call objGraph.addLabel("Data 6")


Call objGraph.setType(1) 
Call objGraph.setBarWidth(10)
Call objGraph.print()
%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.