首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 网站开发 > vbScript >

owc导出图表的有关问题

2012-03-03 
owc导出图表的问题owc导出图表时有一个函数exportpicture,这个函数在IE7中是不支持的,会出现 8003007b 错

owc导出图表的问题
owc导出图表时有一个函数exportpicture,这个函数在IE7中是不支持的,会出现 8003007b 错误,我不想用owc帮助上说的Response.BinaryWrite Chart.GetPicture(PictType, 500, 400)方法,只想用纯的脚本,google了一下,国内基本没有什么解决办法,国外的帖子上有个人是这么说的:
You can try to get the picture with the getPicture method like this:

VBScript code
Dim ChartImageArray() As Byte = CType(AxChartSpace1.GetPicture(),Byte())Dim ChartImageMemoryStream As New IO.MemoryStream(ChartImageArray)Dim img As Image = Image.FromStream(ChartImageMemoryStream)

Then save the img to a file.

这个办法应该可行,但是最后怎么save呢,哎,我真是菜的不行啊,哪位大虾可以告诉我怎么把这个image对象输出到客户端?
或者用javascript:
JScript code
   var imgObj =Chart.GetPicture(PictType, 500, 400);

然后怎么把这个imgObj显示出来呢?

[解决办法]
我也遇到同样问题,受你的启发,通过以下方式解决存图,仅供参考。(VBscript)
dim stream
set stream=createobject("adodb.stream")
stream.type=1
stream.mode=3
stream.open
stream.write ChartSpace1.getPicture("JPG",500,400)
stream.savetofile filename

热点排行