Ciao,
chiedevo se attraverso il componenete OWC che crea i grafici in ASP, è possibile ottenere un grafico 'misto' nel senso che, prendendo ad esempio questo codice
il venduto rimanga in verticale viola, mentre il budget venga visualizzato come fosse una riga con i punti (scusate la spiegazione schifosa)codice:<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <% 'Creiamo l'oggetto Set ChartObj = Server.CreateObject("OWC10.ChartSpace") Set ChartConsts = ChartObj.Constants set NewChart = ChartObj.Charts.Add 'Settiamo il tipo di grafico va da 0 a 65 circa con dei buchi NewChart.Type = 0 'Setto il colore di sfondo NewChart.PlotArea.Interior.Color = "#FFFFFF" 'Titolo del grafico NewChart.HasTitle = True ChartObj.HasChartSpaceTitle = True ChartObj.ChartSpaceTitle.Caption = "TU - Venduto rispotto al budget 2008" ChartObj.ChartSpaceTitle.Font.Bold = True 'Sotto titolo NewChart.Title.Caption = "" 'Creiamo gli array che conterranno i dati da passare all'oggetto e necessari a creare il grafico ReDim ARR_VISITE(4) ReDim ARR_VISITE1(11) ReDim ARR_IMPORTO(11) ' ASSE Y ARR_VISITE(0)=80 ARR_VISITE(1)=90 ARR_VISITE(2)=100 ARR_VISITE(3)=150 ARR_VISITE(4)=300 ' ASSE Y1 ARR_VISITE1(0)=55 ARR_VISITE1(1)=310 ARR_VISITE1(2)=310 ARR_VISITE1(3)=310 ARR_VISITE1(4)=310 ARR_VISITE1(5)=310 ARR_VISITE1(6)=310 ARR_VISITE1(7)=310 ARR_VISITE1(8)=310 ARR_VISITE1(9)=310 ARR_VISITE1(10)=310 ARR_VISITE1(11)=240 ' ASSE X ARR_IMPORTO(0)="2" ARR_IMPORTO(1)="3" ARR_IMPORTO(2)="4" ARR_IMPORTO(3)="5" ARR_IMPORTO(4)="6" ARR_IMPORTO(5)="7" ARR_IMPORTO(6)="8" ARR_IMPORTO(7)="9" ARR_IMPORTO(8)="10" ARR_IMPORTO(9)="11" ARR_IMPORTO(10)="12" ARR_IMPORTO(11)="13" 'Passiamo i valori al grafico NewChart.HasLegend = True 'Attivazione della Legenda 'Creazione delle due serie Set Serie = NewChart.SeriesCollection.Add 'Prima colonna Set Serie1 = NewChart.SeriesCollection.Add 'Seconda colonna NewChart.SeriesCollection(0).Caption = "Budget 2008" 'scritte della legenda x la prima serie NewChart.SeriesCollection(1).Caption = "Venduto" 'scritte della legenda x la seconda serie Serie.SetData ChartConsts.chDimCategories, ChartConsts.chDataLiteral, ARR_IMPORTO Serie.SetData ChartConsts.chDimValues, ChartConsts.chDataLiteral, ARR_VISITE Serie1.SetData ChartConsts.chDimValues, ChartConsts.chDataLiteral, ARR_VISITE1 'Settiamo il path dell'immagine che verrà creata ImagePath=server.mappath("report1.gif") 'Salviamo l'immagine ChartObj.ExportPicture ImagePath,"gif", 900, 700 Response.Write("[img]report1.gif[/img]") set oChart=nothing %> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> <title>ALTRE SPESE</title> </head> <body> </body> </html>
Insomma un misto tra il NewChart.Type = 0 e il NewChart.Type = 9
Qualche idea?

Rispondi quotando