
|
The following example demonstrates how to create multiple series per chart.
Set Chart = Server.CreateObject("AspChart.Chart")
Randomize
'Candle Series
Chart.AddSeries 7
dblOpen = 1000 + Rnd(100)
for intCount = 1 to 30
dblBase = Round(100*Rnd-50)
Chart.AddCandle Now + intCount, dblOpen, dblOpen+20, dblOpen-20, dblOpen+dblBase
dblOpen = dblOpen + dblBase
next
Randomize
'Add a Line Series
Chart.AddSeries 5
dblOpen = 1000 + Rnd(100)
for intCount = 1 to 30
dt = Now + intCount
dblBase = Round(100*Rnd-50)
Chart.AddXY dt, dblOpen, CStr (Month (dt)) + "/" + CStr (Day (dt)) + "/" + CStr (Year (dt) Mod 100), vbRed
dblOpen = dblOpen + dblBase
next
email this code sample to a colleague
|
|
|
|
|
|
|
|
|
|
|
|