Pessoal gostaria de saber se algum modo de gerar gráficos em asp. No meu
trabalho uso uma solução em java mas seria bem melhor se fosse em asp pois
não teria que instalar nenhum plugin...desde já agradeço quem poder me ajudar.

Diogo
D5 SOLUÇÕES

Não, não existe nada para ASP.

--

Bruno Alexandre
København, Danmark

"a portuguese in Denmark"


"Diogo Torres de Lima" <DiogoTorresdeLima@discussions.microsoft.com>
escreveu na mensagem
news:A46EBAFB-D912-4F31-AF09-B4582B5089E8@microsoft.com...
> Pessoal gostaria de saber se algum modo de gerar gráficos em asp. No meu
> trabalho uso uma solução em java mas seria bem melhor se fosse em asp pois
> não teria que instalar nenhum plugin...desde já agradeço quem poder me
> ajudar.
>
> Diogo
> D5 SOLUÇÕES

Olá Bruno,

Cara to desenvolvendo uma aplicação em ASP na qual eu utilizo gráficos e
para fazer isso, estou utilizando o componente ("OWC10.ChartSpace").

Abaixo tem algumas informações sobre o mesmo que peguei no site da LocaWeb,
veja se é útil para vc.

• Utilizando o Office Web Components para Gerar Gráficos Utilizando o Office
Web Components para Gerar Gráficos

Com o componente Office Web Components você pode gerar gráficos em formato
GIF dinamicamente.


Gráfico em Coluna

<%
Set oChart = CreateObject("OWC10.ChartSpace")
Set c = oChart.Constants
oChart.Border.Color = c.chColorNone

Dim categories(3), Vals(3), Vals2(3)

'crie um array que represente os valores da primeira série.
Vals(0) = 5
Vals(1) = 15
Vals(2) = 25
Vals(3) = 35

'crie um array que represente os valores da segunda série.
Vals2(0) = 35
Vals2(1) = 25
Vals2(2) = 15
Vals2(3) = 5

'gráfico de coluna com as duas séries e quatro categorias.
'crie um array que represente as categorias, as categorias serão as mesmas
para as duas séries.
categories(0) = "Brasil"
categories(1) = "Japão"
categories(2) = "EUA"
categories(3) = "Portugal"

With oChart

'adicionando um objeto do gráfico.
..Charts.Add

'adicionando o tipo do gráfico.
..Charts(0).Type = oChart.Constants.chChartTypeColumn3d

'adicionando a primeira série ao gráfico.
..Charts(0).SeriesCollection.Add

'ajustando o subtítulo da série (o texto da legenda).
..Charts(0).SeriesCollection(0).Caption = "Terremoto"

'adicionando as categorias e os valores da primeira série.
..Charts(0).SeriesCollection(0).SetData c.chDimCategories, c.chDataLiteral,
categories
..Charts(0).SeriesCollection(0).SetData c.chDimValues, c.chDataLiteral, Vals

End With

'adicionando a segunda série ao gráfico, legenda, categorias e valores.
With oChart

..Charts(0).SeriesCollection.Add
..Charts(0).SeriesCollection(1).Caption = "Chuva"
..Charts(0).SeriesCollection(1).SetData c.chDimCategories, c.chDataLiteral,
Categories
..Charts(0).SeriesCollection(1).SetData c.chDimValues, c.chDataLiteral, Vals2

..Charts(0).HasLegend = True
..Charts(0).HasTitle = True

End With

Response.Expires = 0
Response.Buffer = true
Response.Clear
Response.ContentType = "image/gif"

'ajustando o tamanho do gráfico (figura).
Response.BinaryWrite oChart.GetPicture("gif",650, 450)
%>




Obs.: No final do script é necessário atribuir o valor "Nothing" para os
objetos criados. Para o exemplo acima ficaria assim:

<% Set objPieChart = Nothing %>


Gráfico em Pizza

<%
Set oChart = CreateObject("OWC10.ChartSpace")
Set c = oChart.Constants
oChart.Border.Color = c.chColorNone

Dim categories(3), Vals(3), Vals2(3)

'crie um array que represente os valores da série.
Vals(0) = 5
Vals(1) = 15
Vals(2) = 25
Vals(3) = 35

'gráfico de pizza com quatro categorias.
'crie um array que represente as categorias.
categories(0) = "Brasil"
categories(1) = "Japão"
categories(2) = "EUA"
categories(3) = "Portugal"

With oChart

'adicionando um objeto do gráfico.
..Charts.Add

'adicionando o tipo do gráfico.
..Charts(0).Type = oChart.Constants.chChartTypePie3d

'adicionando a série ao gráfico.
..Charts(0).SeriesCollection.Add

'ajustando o subtítulo da série (o texto da legenda).
..Charts(0).SeriesCollection(0).Caption = "Terremoto"

'adicionando as categorias e os valoresda série.
..Charts(0).SeriesCollection(0).SetData c.chDimCategories, c.chDataLiteral,
categories
..Charts(0).SeriesCollection(0).SetData c.chDimValues, c.chDataLiteral, Vals

..Charts(0).HasLegend = True
..Charts(0).HasTitle = True

End With

Response.Expires = 0
Response.Buffer = true
Response.Clear
Response.ContentType = "image/gif"

'ajustando o tamanho do gráfico (figura).
Response.BinaryWrite oChart.GetPicture("gif",650, 450)
%>





Obs.: No final do script é necessário atribuir o valor "Nothing" para os
objetos criados. Para o exemplo acima ficaria assim:

<% Set objPieChart = Nothing %>



• Recursos sobre Office Web Components na Internet

Há ainda muita informação na Internet sobre Office Web Components. Na
Microsoft, visite:

http://msdn.microsoft.com/library

Abraço



"Bruno Alexandre" wrote:

> Não, não existe nada para ASP.
>
> --
>
> Bruno Alexandre
> København, Danmark
>
> "a portuguese in Denmark"
>
>
> "Diogo Torres de Lima" <DiogoTorresdeLima@discussions.microsoft.com>
> escreveu na mensagem
> news:A46EBAFB-D912-4F31-AF09-B4582B5089E8@microsoft.com...
> > Pessoal gostaria de saber se algum modo de gerar gráficos em asp. No meu
> > trabalho uso uma solução em java mas seria bem melhor se fosse em asp pois
> > não teria que instalar nenhum plugin...desde já agradeço quem poder me
> > ajudar.
> >
> > Diogo
> > D5 SOLUÇÕES
>
>
>

Olá Diogo,

Eu estou desenvolvendo um sistema WEB em ASP, onde utilizo alguns gráfiocos.
Para gerar esse gráficos , estou utilizando o componente

Segeu abaixo algumas informções sobre o mesmo que peguei no site da LOCAWEB!
======================================================
• Utilizando o Office Web Components para Gerar Gráficos Utilizando o Office
Web Components para Gerar Gráficos

Com o componente Office Web Components você pode gerar gráficos em formato
GIF dinamicamente.


Gráfico em Coluna

<%
Set oChart = CreateObject("OWC10.ChartSpace")
Set c = oChart.Constants
oChart.Border.Color = c.chColorNone

Dim categories(3), Vals(3), Vals2(3)

'crie um array que represente os valores da primeira série.
Vals(0) = 5
Vals(1) = 15
Vals(2) = 25
Vals(3) = 35

'crie um array que represente os valores da segunda série.
Vals2(0) = 35
Vals2(1) = 25
Vals2(2) = 15
Vals2(3) = 5

'gráfico de coluna com as duas séries e quatro categorias.
'crie um array que represente as categorias, as categorias serão as mesmas
para as duas séries.
categories(0) = "Brasil"
categories(1) = "Japão"
categories(2) = "EUA"
categories(3) = "Portugal"

With oChart

'adicionando um objeto do gráfico.
..Charts.Add

'adicionando o tipo do gráfico.
..Charts(0).Type = oChart.Constants.chChartTypeColumn3d

'adicionando a primeira série ao gráfico.
..Charts(0).SeriesCollection.Add

'ajustando o subtítulo da série (o texto da legenda).
..Charts(0).SeriesCollection(0).Caption = "Terremoto"

'adicionando as categorias e os valores da primeira série.
..Charts(0).SeriesCollection(0).SetData c.chDimCategories, c.chDataLiteral,
categories
..Charts(0).SeriesCollection(0).SetData c.chDimValues, c.chDataLiteral, Vals

End With

'adicionando a segunda série ao gráfico, legenda, categorias e valores.
With oChart

..Charts(0).SeriesCollection.Add
..Charts(0).SeriesCollection(1).Caption = "Chuva"
..Charts(0).SeriesCollection(1).SetData c.chDimCategories, c.chDataLiteral,
Categories
..Charts(0).SeriesCollection(1).SetData c.chDimValues, c.chDataLiteral, Vals2

..Charts(0).HasLegend = True
..Charts(0).HasTitle = True

End With

Response.Expires = 0
Response.Buffer = true
Response.Clear
Response.ContentType = "image/gif"

'ajustando o tamanho do gráfico (figura).
Response.BinaryWrite oChart.GetPicture("gif",650, 450)
%>




Obs.: No final do script é necessário atribuir o valor "Nothing" para os
objetos criados. Para o exemplo acima ficaria assim:

<% Set objPieChart = Nothing %>


Gráfico em Pizza

<%
Set oChart = CreateObject("OWC10.ChartSpace")
Set c = oChart.Constants
oChart.Border.Color = c.chColorNone

Dim categories(3), Vals(3), Vals2(3)

'crie um array que represente os valores da série.
Vals(0) = 5
Vals(1) = 15
Vals(2) = 25
Vals(3) = 35

'gráfico de pizza com quatro categorias.
'crie um array que represente as categorias.
categories(0) = "Brasil"
categories(1) = "Japão"
categories(2) = "EUA"
categories(3) = "Portugal"

With oChart

'adicionando um objeto do gráfico.
..Charts.Add

'adicionando o tipo do gráfico.
..Charts(0).Type = oChart.Constants.chChartTypePie3d

'adicionando a série ao gráfico.
..Charts(0).SeriesCollection.Add

'ajustando o subtítulo da série (o texto da legenda).
..Charts(0).SeriesCollection(0).Caption = "Terremoto"

'adicionando as categorias e os valoresda série.
..Charts(0).SeriesCollection(0).SetData c.chDimCategories, c.chDataLiteral,
categories
..Charts(0).SeriesCollection(0).SetData c.chDimValues, c.chDataLiteral, Vals

..Charts(0).HasLegend = True
..Charts(0).HasTitle = True

End With

Response.Expires = 0
Response.Buffer = true
Response.Clear
Response.ContentType = "image/gif"

'ajustando o tamanho do gráfico (figura).
Response.BinaryWrite oChart.GetPicture("gif",650, 450)
%>


Obs.: No final do script é necessário atribuir o valor "Nothing" para os
objetos criados. Para o exemplo acima ficaria assim:

<% Set objPieChart = Nothing %>



• Recursos sobre Office Web Components na Internet

Há ainda muita informação na Internet sobre Office Web Components. Na
Microsoft, visite:

http://msdn.microsoft.com/library

======================================================
Abraço

GFN
"Diogo Torres de Lima" wrote:

> Pessoal gostaria de saber se algum modo de gerar gráficos em asp. No meu
> trabalho uso uma solução em java mas seria bem melhor se fosse em asp pois
> não teria que instalar nenhum plugin...desde já agradeço quem poder me ajudar.
>
> Diogo
> D5 SOLUÇÕES

Olá Diogo,
Da uma olhada nisso..
Esse código eu consegui no site da LocaWeb
http://site.locaweb.com.br/


• Utilizando o Office Web Components para Gerar Gráficos Utilizando o Office
Web Components para Gerar Gráficos

Com o componente Office Web Components você pode gerar gráficos em formato
GIF dinamicamente.


Gráfico em Coluna

<%
Set oChart = CreateObject("OWC10.ChartSpace")
Set c = oChart.Constants
oChart.Border.Color = c.chColorNone

Dim categories(3), Vals(3), Vals2(3)

'crie um array que represente os valores da primeira série.
Vals(0) = 5
Vals(1) = 15
Vals(2) = 25
Vals(3) = 35

'crie um array que represente os valores da segunda série.
Vals2(0) = 35
Vals2(1) = 25
Vals2(2) = 15
Vals2(3) = 5

'gráfico de coluna com as duas séries e quatro categorias.
'crie um array que represente as categorias, as categorias serão as mesmas
para as duas séries.
categories(0) = "Brasil"
categories(1) = "Japão"
categories(2) = "EUA"
categories(3) = "Portugal"

With oChart

'adicionando um objeto do gráfico.
..Charts.Add

'adicionando o tipo do gráfico.
..Charts(0).Type = oChart.Constants.chChartTypeColumn3d

'adicionando a primeira série ao gráfico.
..Charts(0).SeriesCollection.Add

'ajustando o subtítulo da série (o texto da legenda).
..Charts(0).SeriesCollection(0).Caption = "Terremoto"

'adicionando as categorias e os valores da primeira série.
..Charts(0).SeriesCollection(0).SetData c.chDimCategories, c.chDataLiteral,
categories
..Charts(0).SeriesCollection(0).SetData c.chDimValues, c.chDataLiteral, Vals

End With

'adicionando a segunda série ao gráfico, legenda, categorias e valores.
With oChart

..Charts(0).SeriesCollection.Add
..Charts(0).SeriesCollection(1).Caption = "Chuva"
..Charts(0).SeriesCollection(1).SetData c.chDimCategories, c.chDataLiteral,
Categories
..Charts(0).SeriesCollection(1).SetData c.chDimValues, c.chDataLiteral, Vals2

..Charts(0).HasLegend = True
..Charts(0).HasTitle = True

End With

Response.Expires = 0
Response.Buffer = true
Response.Clear
Response.ContentType = "image/gif"

'ajustando o tamanho do gráfico (figura).
Response.BinaryWrite oChart.GetPicture("gif",650, 450)
%>




Obs.: No final do script é necessário atribuir o valor "Nothing" para os
objetos criados. Para o exemplo acima ficaria assim:

<% Set objPieChart = Nothing %>


Gráfico em Pizza

<%
Set oChart = CreateObject("OWC10.ChartSpace")
Set c = oChart.Constants
oChart.Border.Color = c.chColorNone

Dim categories(3), Vals(3), Vals2(3)

'crie um array que represente os valores da série.
Vals(0) = 5
Vals(1) = 15
Vals(2) = 25
Vals(3) = 35

'gráfico de pizza com quatro categorias.
'crie um array que represente as categorias.
categories(0) = "Brasil"
categories(1) = "Japão"
categories(2) = "EUA"
categories(3) = "Portugal"

With oChart

'adicionando um objeto do gráfico.
..Charts.Add

'adicionando o tipo do gráfico.
..Charts(0).Type = oChart.Constants.chChartTypePie3d

'adicionando a série ao gráfico.
..Charts(0).SeriesCollection.Add

'ajustando o subtítulo da série (o texto da legenda).
..Charts(0).SeriesCollection(0).Caption = "Terremoto"

'adicionando as categorias e os valoresda série.
..Charts(0).SeriesCollection(0).SetData c.chDimCategories, c.chDataLiteral,
categories
..Charts(0).SeriesCollection(0).SetData c.chDimValues, c.chDataLiteral, Vals

..Charts(0).HasLegend = True
..Charts(0).HasTitle = True

End With

Response.Expires = 0
Response.Buffer = true
Response.Clear
Response.ContentType = "image/gif"

'ajustando o tamanho do gráfico (figura).
Response.BinaryWrite oChart.GetPicture("gif",650, 450)
%>





Obs.: No final do script é necessário atribuir o valor "Nothing" para os
objetos criados. Para o exemplo acima ficaria assim:

<% Set objPieChart = Nothing %>



• Recursos sobre Office Web Components na Internet

Há ainda muita informação na Internet sobre Office Web Components. Na
Microsoft, visite:

http://msdn.microsoft.com/library


Abraço


"Diogo Torres de Lima" wrote:

> Pessoal gostaria de saber se algum modo de gerar gráficos em asp. No meu
> trabalho uso uma solução em java mas seria bem melhor se fosse em asp pois
> não teria que instalar nenhum plugin...desde já agradeço quem poder me ajudar.
>
> Diogo
> D5 SOLUÇÕES

mas aí estamos a falar de componenets, não foi o que o Diogo perguntou!
eu tambem faço graficos e imagens com componentes!

--

Bruno Alexandre
København, Danmark

"a portuguese in Denmark"


"Geremias" <Geremias@discussions.microsoft.com> escreveu na mensagem
news:B08B7C45-699E-4D9B-9841-5BB5621F8863@microsoft.com...
> Olá Bruno,
>
> Cara to desenvolvendo uma aplicação em ASP na qual eu utilizo gráficos e
> para fazer isso, estou utilizando o componente ("OWC10.ChartSpace").
>
> Abaixo tem algumas informações sobre o mesmo que peguei no site da
> LocaWeb,
> veja se é útil para vc.
>
> . Utilizando o Office Web Components para Gerar Gráficos Utilizando o
> Office
> Web Components para Gerar Gráficos
>
> Com o componente Office Web Components você pode gerar gráficos em formato
> GIF dinamicamente.
>
>
> Gráfico em Coluna
>
> <%
> Set oChart = CreateObject("OWC10.ChartSpace")
> Set c = oChart.Constants
> oChart.Border.Color = c.chColorNone
>
> Dim categories(3), Vals(3), Vals2(3)
>
> 'crie um array que represente os valores da primeira série.
> Vals(0) = 5
> Vals(1) = 15
> Vals(2) = 25
> Vals(3) = 35
>
> 'crie um array que represente os valores da segunda série.
> Vals2(0) = 35
> Vals2(1) = 25
> Vals2(2) = 15
> Vals2(3) = 5
>
> 'gráfico de coluna com as duas séries e quatro categorias.
> 'crie um array que represente as categorias, as categorias serão as mesmas
> para as duas séries.
> categories(0) = "Brasil"
> categories(1) = "Japão"
> categories(2) = "EUA"
> categories(3) = "Portugal"
>
> With oChart
>
> 'adicionando um objeto do gráfico.
> .Charts.Add
>
> 'adicionando o tipo do gráfico.
> .Charts(0).Type = oChart.Constants.chChartTypeColumn3d
>
> 'adicionando a primeira série ao gráfico.
> .Charts(0).SeriesCollection.Add
>
> 'ajustando o subtítulo da série (o texto da legenda).
> .Charts(0).SeriesCollection(0).Caption = "Terremoto"
>
> 'adicionando as categorias e os valores da primeira série.
> .Charts(0).SeriesCollection(0).SetData c.chDimCategories, c.chDataLiteral,
> categories
> .Charts(0).SeriesCollection(0).SetData c.chDimValues, c.chDataLiteral,
> Vals
>
> End With
>
> 'adicionando a segunda série ao gráfico, legenda, categorias e valores.
> With oChart
>
> .Charts(0).SeriesCollection.Add
> .Charts(0).SeriesCollection(1).Caption = "Chuva"
> .Charts(0).SeriesCollection(1).SetData c.chDimCategories, c.chDataLiteral,
> Categories
> .Charts(0).SeriesCollection(1).SetData c.chDimValues, c.chDataLiteral,
> Vals2
>
> .Charts(0).HasLegend = True
> .Charts(0).HasTitle = True
>
> End With
>
> Response.Expires = 0
> Response.Buffer = true
> Response.Clear
> Response.ContentType = "image/gif"
>
> 'ajustando o tamanho do gráfico (figura).
> Response.BinaryWrite oChart.GetPicture("gif",650, 450)
> %>
>
>
>
>
> Obs.: No final do script é necessário atribuir o valor "Nothing" para os
> objetos criados. Para o exemplo acima ficaria assim:
>
> <% Set objPieChart = Nothing %>
>
>
> Gráfico em Pizza
>
> <%
> Set oChart = CreateObject("OWC10.ChartSpace")
> Set c = oChart.Constants
> oChart.Border.Color = c.chColorNone
>
> Dim categories(3), Vals(3), Vals2(3)
>
> 'crie um array que represente os valores da série.
> Vals(0) = 5
> Vals(1) = 15
> Vals(2) = 25
> Vals(3) = 35
>
> 'gráfico de pizza com quatro categorias.
> 'crie um array que represente as categorias.
> categories(0) = "Brasil"
> categories(1) = "Japão"
> categories(2) = "EUA"
> categories(3) = "Portugal"
>
> With oChart
>
> 'adicionando um objeto do gráfico.
> .Charts.Add
>
> 'adicionando o tipo do gráfico.
> .Charts(0).Type = oChart.Constants.chChartTypePie3d
>
> 'adicionando a série ao gráfico.
> .Charts(0).SeriesCollection.Add
>
> 'ajustando o subtítulo da série (o texto da legenda).
> .Charts(0).SeriesCollection(0).Caption = "Terremoto"
>
> 'adicionando as categorias e os valoresda série.
> .Charts(0).SeriesCollection(0).SetData c.chDimCategories, c.chDataLiteral,
> categories
> .Charts(0).SeriesCollection(0).SetData c.chDimValues, c.chDataLiteral,
> Vals
>
> .Charts(0).HasLegend = True
> .Charts(0).HasTitle = True
>
> End With
>
> Response.Expires = 0
> Response.Buffer = true
> Response.Clear
> Response.ContentType = "image/gif"
>
> 'ajustando o tamanho do gráfico (figura).
> Response.BinaryWrite oChart.GetPicture("gif",650, 450)
> %>
>
>
>
>
>
> Obs.: No final do script é necessário atribuir o valor "Nothing" para os
> objetos criados. Para o exemplo acima ficaria assim:
>
> <% Set objPieChart = Nothing %>
>
>
>
> . Recursos sobre Office Web Components na Internet
>
> Há ainda muita informação na Internet sobre Office Web Components. Na
> Microsoft, visite:
>
> http://msdn.microsoft.com/library
>
> Abraço
>
>
>
> "Bruno Alexandre" wrote:
>
>> Não, não existe nada para ASP.
>>
>> --
>>
>> Bruno Alexandre
>> København, Danmark
>>
>> "a portuguese in Denmark"
>>
>>
>> "Diogo Torres de Lima" <DiogoTorresdeLima@discussions.microsoft.com>
>> escreveu na mensagem
>> news:A46EBAFB-D912-4F31-AF09-B4582B5089E8@microsoft.com...
>> > Pessoal gostaria de saber se algum modo de gerar gráficos em asp. No
>> > meu
>> > trabalho uso uma solução em java mas seria bem melhor se fosse em asp
>> > pois
>> > não teria que instalar nenhum plugin...desde já agradeço quem poder me
>> > ajudar.
>> >
>> > Diogo
>> > D5 SOLUÇÕES
>>
>>
>>