[owc问题]请问owc.chart对象是否支持直接生成2进制数据流显示图片，顶着又分？

[HHH20000]

请问owc.chart对象是否支持直接生成2进制数据流显示图片，
如果没有有没有变通的方法，
因为我不想再服务器端生成临时图片（删除不爽），
谢谢~！！

[underone]

UP

[hhjjhjhj]

GetPicture 方法
从二进制数据流返回图表图片。

expression.GetPicture(FilterName, Width, Height)
expression 必需。该表达式返回一个 ChartSpace 对象。

FilterName String 类型，可选。所用的图形过滤器名称。默认值为 "GIF"。

Width Long 类型，可选。以像素为单位的图表宽度。

Height Long 类型，可选。以像素为单位的图表高度。

说明
可以使用 BinaryWrite 方法将该方法返回的图片写入当前 HTTP 会话。

示例
本示例使用 ASP 脚本根据 SQL Server 数据库中的数据创建图表。创建图表后，将在浏览器窗口中显示图表的图片。

<%
Dim PictType
Dim NewChart
Dim chConstants

Set NewChart = CreateObject("OWC11.ChartSpace")

Response.Expires = 0
Response.Buffer = True
Response.Clear

PictType = "jpg"
Response.ContentType = "image/" & PictType

Set chConstants = NewChart.Constants

NewChart.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=TRUE;" & _
"Integrated Security=SSPI;Initial Catalog=Northwind;" & _
"Data Source=servername;"
NewChart.DataMember = "Order Details"

NewChart.SetData chConstants.chDimCategories, chConstants.chDataBound, "ProductID"
NewChart.SetData chConstants.chDimValues, chConstants.chDataBound, "Quantity"

NewChart.Charts(0).Type = chConstants.chChartTypeColumn3D
NewChart.Charts(0).HasTitle = True
NewChart.Charts(0).Title.Caption = "Server-Rendered Chart"

Response.BinaryWrite NewChart.GetPicture(PictType, 500, 400)
%>

[HHH20000]

先顶楼上大头
我的是office2000，
是否支持这个对象？？

[HHH20000]

顶~~！！
谢谢大家~~！！

[hhjjhjhj]

我这里没2000的，无法知道2000是否支持GetPicture 方法

但OWC是免费的，微软网站上有单独安装包下载，安装一个新版的吧。