asp操作excel文件

<%
dim connxls,connstrxls
connstrxls="DBQ=d:/newexcel.xls;DefaultDir=;DRIVER={Microsoft Excel Driver (*.xls)};"
set connxls=server.createobject("ADODB.CONNECTION")
connxls.open connstrxls
Set rsxls=Server.CreateObject("ADODB.Recordset")
SQLxls = "select * from [new$]"
rsxls.open SQLxls,connxls,1,1
%>

注意: 写法和连接ACCESS基本相同,不同的是,在调用工作表的时候,不能直接用表名,工作表名后要加$,而且要用“[]”括起来。

asp操作excel的总结:

1、建立Excel对象
<%
set objExcelApp=CreateObject("Excel.Application")
objExcelApp.DisplayAlerts=false '不显示警告
objExcelApp.Application.Visible=false '不显示界面
%>
2、新建Excel文件
<%
objExcelApp.WorkBooks.add
set objExcelBook=objExcelApp.ActiveWorkBook
set objExcelSheets=objExcelBook.Worksheets
set objExcelSheet=objExcelBook.Sheets(1)
%>
3、读取已有Excel文件
<%
strAddr=Server.MapPath(".")
objExcelApp.WorkBooks.Open(strAddr&"/Templet/Table.xls")
set objExcelBook=objExcelApp.ActiveWorkBook
set objExcelSheets=objExcelBook.Worksheets
set objExcelSheet=objExcelBook.Sheets(1)
%>
4、另存Excel文件
<%
objExcelBook.Save As strAddr&"/Temp/Table.xls"
%>
5、保存Excel文件
<%
objExcelBook.Save (笔者测试时保存成功,页面报错。)
%>
6、退出Excel操作
<%
objExcelApp.Quit '一定要退出
setobjExcelApp=Nothing
%>
三、ASP操作Excel生成数据表
1、在一个范围内插入数据
objExcelSheet.Range("B3:k3").value="http://www.vcmblog.com/Array("67","87","5","9","7","45","45","54","54","10")
2、在一个单元格内插入数据
objExcelSheet.Cells(3,1).value="http://www.vcmblog.com/InternetExplorer"
3、选中一个范围
4、单元格左边画粗线条
5、单元格右边画粗线条
6、单元格上边画粗线条
7、单元格下边画粗线条
8、单元格设定背景色
9、合并单元格
10、插入行
11、插入列四、ASP操作Excel生成Chart图
1、创建Chart图
objExcelApp.Charts.Add
2、设定Chart图种类
objExcelApp.ActiveChart.ChartType=97
注:二维折线图,4;二维饼图,5;二维柱形图,51
3、设定Chart图标题
objExcelApp.ActiveChart.HasTitle=True
objExcelApp.ActiveChart.ChartTitle.Text="AtestChart"
4、通过表格数据设定图形
objExcelApp.ActiveChart.SetSourceDataobjExcelSheet.Range("A1:k5"),1
5、直接设定图形数据(推荐)
objExcelApp.ActiveChart.SeriesCollection.NewSeries
objExcelApp.ActiveChart.SeriesCollection(1).Name="=""333"""
objExcelApp.ActiveChart.SeriesCollection(1).Values="={1,4,5,6,2}"
6、绑定Chart图
objExcelApp.ActiveChart.Location1
7、显示数据表
objExcelApp.ActiveChart.HasDataTable=True
8、显示图例
objExcelApp.ActiveChart.DataTable.ShowLegendKey=True五、服务器端Excel文件浏览、下载、删除方案
浏览的解决方法很多,“Location.href=”,“Navigate”,“Response.Redirect”都可以实现,建议用客户端的方法,原因是给服务器更多的时间生成Excel文件。
  • 0
    点赞
  • 2
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值