Hi Doug
Its from
http://www.chestysoft.com/drawgraph/default.asp I have found it to be a great component. very worth $50. I have email them about changes EG including a liniar regretion type trend line. The guy updated and sent me a new dll within days. Good bloke.
I not sure how I would send a place holder given page B is called within the image tag. I have exclude the query however here is the code that draws the chart (also gives other users a snap shot of some of tyhe chart properties):
do while not values.eof
Chart.AddData values(0), values(1), colours(count)
values.moveNext
count = count + 1
loop
if runSecondConRS = true then
if not seconConRS.Eof then
do until seconConRS.Eof
Chart.AddData seconConRS(0), seconConRS(1), colours(count)
seconConRS.moveNext
count = count + 1
loop
end if
end if
Chart.Width = request.queryString("width")
Chart.Height = request.queryString("height")
Chart.LegendX = request.queryString("width") -135
Chart.MaxX = request.queryString("width")-180
Chart.MaxY = request.queryString("height")-210
Chart.LegendTextSize = 7
Chart.BarWidth = 15
Chart.GridColor = "#cccccc"
Chart.XAxisText = session("xAxisName")
Chart.YAxisText = "Number of Incidents"
'Chart.Title = session("osirTypeName")
Chart.LabelVertical = true
Chart.ShowBarTotal = true
Chart.AxisTextBold = true
Chart.ShowGrid = true
Chart.ShowTrendLine = trendLine
Chart.TrendLineColor = request.queryString("trendColor")
Chart.TrendLineWidth = 1
Response.ContentType = "Image/Gif"
Response.BinaryWrite Chart.GIFBar
Response.End
set chart=nothing
set values=nothing
if isobject(runSecondConRS) then set runSecondConRS = nothing end if
conn.close
set conn = nothing
Wind is your friend
Matt
www.elitemarquees.com.au