困扰了很久的一个问题ASP与EXCEL

[lxf_0233]

以下为源码!!!
=======================================================================================
<%
Dim DBCNDB,DBRSDB
Set DBCNDB=Server.CreateObject("ADODB.Connection")
Set DBCMDB=Server.CreateObject("ADODB.Command")
Set DBRSDB=Server.CreateObject("ADODB.Recordset")
With DBCNDB
.ConnectionString = "Provider=SQLOLEDB.1;Password=854760668;Persist Security Info=True;User ID=sa;Initial Catalog=Table;Data Source=WS\SQL2000"
.Mode = adModeReadWrite
.Open
End With
DBCMDB.ActiveConnection=DBCNDB
DBCMDB.CommandText="Select * From [dt_gjsz_yhjsh_zc] Where Year(TableDateTime)=" & Cint(1977) & " And Month(TableDateTime)=" & Cint(1)
DBRSDB.Open DBCMDB,,adOpenKeyset
%>
<%
Response.ContentType="Application/vnd.ms-excel"
%>
<table border="1" width="100%" id="table1" cellpadding="0" cellspacing="0">
<tr>
<td colspan="4" align="center">银行结售汇月报比例分析表（支出部分）</td>
</tr>
<tr>
<td colspan="2">填报日期：</td>
<td colspan="2" align="right">单位：万美元</td>
</tr>
<tr>
<td>代号</td>
<td>项目</td>
<td>本月发生数</td>
<td>本年累计</td>
</tr>
<% On Error Resume Next %>
<% Do While Not DBRSDB.Eof %>
<tr>
<td><% = DBRSDB("NumberID") %></td>
<td><% = DBRSDB("ListItem") %></td>
<td><% = DBRSDB("MonthHappen") %></td>
<td><% = DBRSDB("YearHappen") %></td>
</tr>
<% DBRSDB.MoveNext %>
<% Loop %>
</table>
===============================================================
如果想要在EXCEL打开后,自动根椐"本月发生数"生成一个图表,应该怎么做?请指教.
应该看那什么书.能实显否?

[slayerbb]

OWC
提供所有的office相关的操作。
Office Web Components 9.0 的帮助文件默认安装在 %SystemDrive%\Program Files\Microsoft Office\Office\1033 文件夹中。Office XP Web Components 的帮助文件默认安装在 %SystemDrive%\Program Files\Common Files\Microsoft Shared\Web Components\10\1033 文件夹中。Office 2003 Web Components 的帮助文件默认安装在 %SystemDrive%:\Program Files\Common Files\Microsoft Shared\Web Components\11\1033 文件夹中

组件名称 Office Web Components 9.0 Office XP Web Components Office 2003 Web Components 说明
图表 MSOWCDCH.chm OWCDCH10.chm OWCDCH11.chm 图表组件设计时参考
数据透视表 MSOWCDPL.chm OWCDPL10.chm OWCDPL11.chm 数据透视表组件设计时参考
电子表格 MSOWCDSS.chm OWCDSS10.chm OWCDSS11.chm 电子表格组件设计时参考
电子表格 MSOWCFUN.chm OWCFUN10.chm OWCFUN11.chm 电子表格组件内置功能参考
数据源、图表、数据透视表和电子表格 MSOWCVBA.chm OWCVBA10.chm OWCVBA11.chm 所有组件的编程参考

[chinastorm]

从SQL直接生成EXCEL网上有好多的

[yiyioo]

也可以用vml，网上有源码函数