这段代码运作出现灾难性故障,是什么原因

这段代码运行出现灾难性故障,是什么原因?% Dim ChartType, OutputStream, ViewTypeSet Chart1 CreateOb

这段代码运行出现灾难性故障,是什么原因?
<% Dim ChartType, OutputStream, ViewType

  Set Chart1 = CreateObject("TeeChart.TChart")

  Chart1.AddSeries(0)

  Chart1.Series(0).FillSampleValues 20    ' 随机生成数据

  OutputStream=Chart1.Export.asPNG.SaveToStream

  Set Chart1=Nothing

  Response.Binarywrite OutputStream

%>

问题在这句:OutputStream=Chart1.Export.asPNG.SaveToStream

然后下次运行的时候IIS就挂了。
[解决办法]
能把IIS弄滩的情况多的很,你的这可能是程序执行死掉了,IIS也搞挂了!
[解决办法]
看日志里面说什么错误