怎样把数据汇到Excel中的心得经验

经常看到有些人问怎么把Table的资料转到Excel里面去，很多人在碰到这个问题都先考虑用execl.appliction，我用过感觉很不好，首先必需要掌握它的一些内部用法，其次它在客户端使用时涉及安全性，使用不太好，以下给大家介绍三众方法：
方法一：用单纯的文本格式实现
该方法相当简单，以下给出代码，各位就容易明白
<% set fso=server.createobject("scripting.filesystemobject")
strExcelFile=server.MapPath("txtToExcel.xls")
if fso.fileExists(strExcelFile) then fso.deletefile strExcelFile
Set xslFile = fso.CreateTextFile(strExcelFile , True)
xslFile.WriteLine("df" & vbTab & "345" & vbLf & "fe" & vbTab & "mon" &vbLf)
xslFile.Close
set fso=nothing
response.write "OK"
%>
原理：
相信大家都知道，Excel是可以打开文本文件的（什么？你不知道，先回去做两个月的文员再来编程，太不懂打破规则了），而对于里面的文本内容Excel则会这样处理：如果遇到[制表符]Tab键则跳下一列，如果遇到[换行符]则换下一行，所以根据这个规则我们整理一下就可以产生单一表格式Excel文件了，
优点：
掌握简单，纯粹的文字整理而已（哈！原来不就是文字游戏而已，哼！提到游戏就精神了吧）
缺点：
效率较低，把一个较多内容的table转成Excel档要则执行较长的循环（），而文档格式只能是规则的行列格式，对表格不能做更多的设置
方法二：用OWC实现：
此方法也简单（OWC！不又要学新东西了？放心，非常简单，只要你具备男国足的头脑就OK，什么？还不够，拖出去海扁九九八十二下，不好意思，打上瘾，多了一下），只是少为人知而已（在网上我没看到其他人用过），同样先给出代码：