9core.com - 九核技术交流网

九百链
为了更好的解决实际工作中遇到的问题,本站开设了QQ群 ASP+PHP+JSP+.NET①:9793624
ASP+PHP+JSP+.NET②:17775294
网站通告: 新开设QQ群,群号:17775294 九核WEB技术专业论坛 官方QQ群 9793624
搜索: 您的位置主页> 程序开发 > Asp技术 >阅读资讯: asp操作excel文件的函数

asp操作excel文件的函数

文章来源:互联网 发表时间:2008-09-12 点击次数

一、配置方法

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

1、开始---运行---dcomcnfg

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

2、组件服务---计算机---我的电脑---dcom配置---Microsoft Excel应用程序(右键)---属性---安全

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

3、启动和激活权限 选择自定义,点击编辑,添加用户everyone并给予所有权限

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

4、访问权限、配置权限同上

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

二、ASP对Excel的基本操作

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

1、建立Excel对象

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg


set objExcelApp = CreateObject("Excel.Application")
objExcelApp.DisplayAlerts = false '不显示警告
objExcelApp.Application.Visible = false '不显示界面

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

2、新建Excel文件

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg


objExcelApp.WorkBooks.add
set objExcelBook = objExcelApp.ActiveWorkBook
set objExcelSheets = objExcelBook.Worksheets
set objExcelSheet = objExcelBook.Sheets(1)

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

3、读取已有Excel文件 

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg


strAddr = Server.MapPath(".") 
objExcelApp.WorkBooks.Open(strAddr & "\Templet\Table.xls") 
set objExcelBook = objExcelApp.ActiveWorkBook 
set objExcelSheets = objExcelBook.Worksheets 
set objExcelSheet = objExcelBook.Sheets(1) 

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

4、另存Excel文件

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg


objExcelBook.SaveAs strAddr & "\Temp\Table.xls" 

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

5、保存Excel文件 

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg


objExcelBook.Save(笔者测试时保存成功,页面报错。)
 

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

6、退出Excel操作

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg


objExcelApp.Quit '一定要退出
set objExcelApp = Nothing

Y1HJDDED5iK803SMJp2L2Er9tEA4n1WpwAIbCahg

Asp
关于我们 - 联系我们 - 广告服务 - 友情链接 - 网站地图 - 版权声明 - 人才招聘 - 帮助