grafiek maken met asp - Softwareontwikkeling

woensdag 26 september 2001 09:29

Acties:

Verwijderd

Topicstarter

heey twiekerz,
ik had ff een vraagje.

Ik heb een pagina in asp gemaakt waarmee je d.m.v. allerlei gegevens uit de database een grafiek laat zien.
De grafiek heb ik als volgt gedeclareerd:
Dim FS

' Create a FileSystemObject to provide files in the script
Set fs = server.CreateObject("Scripting.FileSystemObject")

DeleteOldCharts()

Dim oChart, c, Categories(), Vals(), sCaption, Chart, Serie

' Create a Chart Object
Set oChart = Server.CreateObject("OWC.Chart")
Set c = oChart.Constants

' Set the different parameters for the ChartSpace
oChart.Border.Color = c.chColorNone

Set Chart = oChart.Charts.Add
Chart.Type = "6"
'soort grafiek
Chart.HasLegend = True
'legenda weergeven
Chart.HasTitle = true
'title van pagina aanwezig
Chart.Title.caption=Gebouw 'SQL
'gegevens uit 1 gebouw
chart.Plotarea.interior.color = RGB(200,200,200)
'kleuren voor de grafiek
Chart.Legend.Position=oChart.Constants.chLegendPositiontop
'positie van de legenda
oChart.Charts(0).Axes(c.chAxisPositionBottom).Font.Size =8
'grote van de lettertype onder de grafiek
'oChart.Charts(0).Axes(c.chAxisPositionBottom).Font.color = rgb(255,255,255)
'kleur van de letters onder de grafiek
Chart.Axes(c.chAxisPositionBottom).majorunit =4
'aantal verticale lijnen in grafiek
Chart.Axes(c.chAxisPositionBottom).hasmajorgridlines = true
'verticale lijnen inschakelen
de data worden op een aan tijdstip uit de database gehaald.

Nu weet ik alleen niet hoe je de legenda kan wijzigen.

Want het probleem is dat ik gegevens per kwartier heb opgeslagen maar ik wil ze per uur laten zien.

Misshien ziet dit probleem er vaag uit, maar ja dat is het ook.

MZZL en alvast bedankt

woensdag 26 september 2001 12:15

Acties: