asp操作EXCEL文件

一、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$]" 
%>

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

二、asp操作Excel的总结:

1、建立Excel对象
setobjExcelApp=CreateObject("Excel.Application")
objExcelApp.DisplayAlerts=false不显示警告
objExcelApp.Application.Visible=false不显示界面

2、新建Excel文件
objExcelApp.WorkBooks.add
setobjExcelBook=objExcelApp.ActiveWorkBook
setobjExcelSheets=objExcelBook.Worksheets
setobjExcelSheet=objExcelBook.Sheets(1)

3、读取已有Excel文件
strAddr=Server.MapPath(".")
objExcelApp.WorkBooks.Open(strAddr&"TempletTable.xls")
Set objExcelBook=objExcelApp.ActiveWorkBook
Set objExcelSheets=objExcelBook.Worksheets
Set objExcelSheet=objExcelBook.Sheets(1)

4、另存Excel文件
objExcelBook.SaveAsstrAddr&"TempTable.xls"

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

6、退出Excel操作
objExcelApp.Quit一定要退出
Set objExcelApp=Nothing

三、ASP操作Excel生成数据表

1、在一个范围内插入数据
objExcelSheet.Range("B3:k3").Value=Array"67","87","5","9","7","45","45","54","54","10")

2、在一个单元格内插入数据
objExcelSheet.Cells(3,1).Value="InternetExplorer"

四、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="="

6、绑定Chart图
objExcelApp.ActiveChart.Location1

7、显示数据表
objExcelApp.ActiveChart.HasDataTable=True

8、显示图例
objExcelApp.ActiveChart.DataTable.ShowLegendKey=True

五、服务器端Excel文件浏览、下载
      浏览的解决方法很多,“Location.href=”,“Navigate”,“Response.Redirect”都可以实现,建议用客户端的方法,原因是给服务器更多的时间生成Excel文件。

コメントを残す

メールアドレスが公開されることはありません。