Ancora OWC

[FISICO]

Ho costruito dei grafici usando gli OWC seguendo i consigli vari trovati sul forum, su internet e su msdn...ma non sono riuscito ancora a risolvere un problema: come si può fare comparire il valore di ogni colonna (o di ogni spicchio di torta, etc) ??

Insomma vorrei che vengano indicati anche i valori sul grafico che viene restituito a video.

Spero di essere stato chiaro e che qlc di voi sappia darmi la dritta giusta!!

Grazie

[steweb]

Posta un po di codice !!

[FISICO]

Eccolo qui:

<%
'Creiamo l'oggetto 
Set ChartObj = Server.CreateObject("OWC10.ChartSpace") 
Set ChartConsts = ChartObj.Constants 
set NewChart = ChartObj.Charts.Add 
NewChart.HasLegend = True
NewChart.PlotArea.Interior.Color = "LightYellow" 
NewChart.HasTitle = True
NewChart.Title.Caption = "INDICI"
set fnt = NewChart.Title.Font
fnt.Name = "Tahoma"
fnt.Size = 10
fnt.Bold = True
set ax = NewChart.Axes(ChartConsts.chAxisPositionBottom)
ax.HasTitle = True
ax.Title.Caption = "Anni"
set fnt = ax.Title.Font
fnt.Name = "Tahoma"
fnt.Size = 8
fnt.Bold = True
set ax = NewChart.Axes(ChartConsts.chAxisPositionLeft)
'ax.NumberFormat = "Currency"
ax.HasTitle = True
ax.Title.Caption = "Commesse"
set fnt = ax.Title.Font
fnt.Name = "Tahoma"
fnt.Size = 8
fnt.Bold = True
'Settiamo il tipo di grafico 
NewChart.Type = 1
'Passiamo i valori al grafico 
Set Serie = NewChart.SeriesCollection.Add 
Serie.SetData ChartConsts.chDimCategories, ChartConsts.chDataLiteral, Anni 
Serie.SetData ChartConsts.chDimValues, ChartConsts.chDataLiteral, Valori 
'Settiamo il path dell'immagine che verrà creata 
ImagePath=server.mappath("report.gif") 
'Salviamo l'immagine 
ChartObj.ExportPicture ImagePath,"gif", 800, 600 
set oChart=nothing 
%> 
[img]report.gif[/img]

Anni e Valori sono due array costruiti da una query su un DB