Friends,
I have been migrating ASP applications from IIS4.0/NT4.0 to
IIS5.0/W2K. All the applications working perfectly except one. This
particular application will make use of asp chart object.
Sub BuildGraph(rate(), name,color,chartHight,chartWidth)
ctBar = 5
cNone = 0
cGradient = 6
'***** Delete old jpg's ****
ON error resume next
rem ************************************************** ********************
rem * Instantiate the Chart component
rem ************************************************** ********************
Set Chart = Server.CreateObject ("ASPChart.Chart")
Chart.AddSeries (ctBar)
Chart.VertAxisMax= 100
Chart.VertAxisMin = 90
for i = 1 to 12
if rate(i) <> 0 then
Chart.AddValue rate(i), MonthName(i,TRUE) , color
end if
Next
Chart.BarStyle = cGradient
Chart.LegendVisible = false
Chart.AddAxisLabel 2,name
rem ************************************************** ********************
rem * Set the PanelColor, remove the OuterBevel
rem ************************************************** ********************
Chart.PanelColor = vbWhite
Chart.BevelOuter = cNone
Chart.ChartBGColor = vbWhite
rem ************************************************** ********************
rem * Set the Width and Height of the image
rem ************************************************** ********************
Chart.Height = chartHight '100
Chart.Width = chartWidth '300
rem ************************************************** ********************
rem * Set the filename, save the image and write the image tag
rem ************************************************** ********************
rem dir_path value "d:\inetpub\download"
Chart.FileName = Application("dir_path")& Session.SessionID & name &
".jpg"
Chart.SaveChart
rem ************************************************** ********************
rem * Destroy the object
rem ************************************************** ********************
Set Chart = nothing
End sub
This code is in functions_share.asp
The above sub being called from the xyz.asp (located in the same
folder as "download" folder is) as following:
If Session("GRAPH_type")="abc" or Session("GRAPH_type")="def" then
Call BuildGraph(filled_rate,"Chart Name",vbBlue,100,300)
<td><img src="./download/<%=Session.SessionID%>Chart%20Name.jpg"></td>
The problem with the above blocks of codes is " JPG are not created
!". I have given enough permissions to write to "download" folder.
What am I missing here.
Any help in this direction appreciated...
TIA
KP
