CHART

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<!-- ~MESSAGE_AFTER~ -->

what's the error msgs when the script run ?
and you will get better response if you post it here.
microsoft.public.inetserver.asp.general

--
Regards,
Bernard Cheah
<a style='text-decoration: underline;' href="http://support.microsoft.com/" target="_blank">http://support.microsoft.com/</a>
Please respond to newsgroups only ...


"kp" <KP.DeleteThis@KP.COM> wrote in message
news:053501c3770c$884a00d0$a101280a@phx.gbl...
 > 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
 >
 >
 >
 >
 >
 >
 >
 >
 >
 >
 >
 >
 >
 >
 >
 >
 >
 >
 >
 ><!-- ~MESSAGE_AFTER~ -->