EXECL表的使用问题

Question

我有一个表aa，它的字段有　商品编号,商品名称,数量,金额
进行条件查询
adodc.recordsorce "select * from aa where 商品名称='"&text1.text&"'"
adodc1.refresh
用一个按钮，将满足条件的记录导入到execl表，如何编写，请指教
我不会　excel 的引用，请帮帮忙给出完整的代码

Answer 1

不用引用，直接使用SQL语句就导出去到EXCELsql="SELECT * INTO [Excel 8.0;DataBase=C;\filename.xls].[表名]   from aa where 商品名称='"&text1.text&"'"
adocn.execute Sql不需要装EXCEL，直接就可以了