象的SaveAs方法来保存Excel。
在最后一定要记住一件事情那就是
Set xlWorksheet = Nothing
xlApplication.Quit '释放对象
Set xlApplication = Nothing
也就是释放对象,否则你会发现你的任务管理器里面都是Excel.exe,呵呵,这是所有人都不想看到的吧:)
好了,这样你就可以自由的通过Excel.Application来操作Excel了,无论是生成还是读取都是如此的简单和逻辑化。
这里读取和生成各方一个Demo
生成Demo
Set xlApplication = Server.CreateObject("Excel.Application") rem 调用excel对象
xlApplication.Visible = False rem 无需打开excel
xlApplication.SheetsInNewWorkbook=1 rem 指定excel中表的数量
xlApplication.Workbooks.Add rem 添加工作簿
Set xlWorksheet = xlApplication.Worksheets(1) rem 生成第1个工作表的子对象
xlWorksheet.name="工作表名称" rem 指定工作表名称
'在保存之前,最好确定一下是否已经存在如果存在用FSO删除
'Set fs = CreateObject("Scripting.FileSystemObject")
'tfile=Server.MapPath("保存文件路径")
'if fs.FileExists(tfile) then
'Set f = fs.GetFile(tfile)
'f.delete true
'Set f = nothing
xlWorksheet.SaveAs "保存文件路径"
Set xlWorksheet = Nothing rem 释放对象
xlApplication.Quit rem 关闭对象
Set xlApplication = Nothing rem 释放对象
读取Demo
Set xlApplication = Server.CreateObject("Excel.Application") rem 调用excel对象
xlApplication.Visible = False rem 无需打开excel
xlApplication.Workbooks.Open server.MapPath("Excel相对路径")
Set xlWorksheet = xlApplication.Worksheets(1) rem 生成第1个工作表的子对象
testValue = xlWorksheet.Range("A1").value
Response.Write(testValue)
Set xlWorksheet = Nothing
xlApplication.
Quit '释放对象
Set xlApplication = Nothing
上一篇主要是说Excel.Application,因为这是微软的东西,而且是ASP和.Net共同的通用对象,但是也是因为他的不安全性和不稳定性,这里并不是很推荐使用。
反而是接下来的方法我更希望大家接受。当然
网络上还有通过一些其他对象生成的方法,但是我比较推荐下面两种方法。要说明的就是,其实Excel有很多简单的文件内容格式。比如CSV文件就是一个特例,他按照单元格用“,”逗号分开,行用换行符分开的方法来实现数据的存储。其实只要是符合Excel的文件格式的文本文件都可以,只要你拼装正确,包括table、制表符分割和
xml等很多格式。
其他方法一:Fso方法
创建fso对象,然后拼装Table字符串(当然你也可以拼写其他的字符串格式),然后写入,实际上就是这么简单
我是一个非常不愿意直接写代码的人,所以这里我给出生成字符串后的格式,至于fso的使用,大家还是自己搜索一下
ID |
名字 |
地址 |
电子邮件地址 |
住宅电话 |
单位电话 |
移动电话 |
生日 |
0 |
用户0 |
用户0的地址 |
User0@User |
123123 |
123123 |
123123 |
2005-12-9 20:18:11 |
1 |
用户1 |
用户1的地址 |
User1@User |
123123 |
123123 |
123123 |
2005-12-9 20:18:13 |
方法二:ADOStream 这个方法和FSO完全相同,只是使用的对象不同,同样对象的使用可以查询官方文档。
通过以上两个方式去完成一个Excel的创建,是我非常推荐的。这样的方式是最于
web的一种安全方式。