ASP如何操作Excel（读取，输出）（3）
来源：CSDN 发布时间：2007-08-21 19:57:00
标签：Excel,ASP,操作
五、服务器端Excel文件浏览、下载、删除方案
浏览的解决方法很多，“Location.href=”，“Navigate”，“Response.Redirect”都可以实现，建议用客户端的方法，原因是给服务器更多的时间生成Excel文件。
下载的实现要麻烦一些。用网上现成的服务器端下载组件或自己定制开发一个组件是比较好的方案。另外一种方法是在客户端操作Excel组件，由客户端操作服务器端Excel文件另存至客户端。这种方法要求客户端开放不安全ActiveX控件的操作权限，考虑到通知每个客户将服务器设置为可信站点的麻烦程度建议还是用第一个方法比较省事。9S_’N .]pW％#}l
删除方案由三部分组成：
A：同一用户生成的Excel文件用同一个文件名，文件名可用用户ID号或SessionID号等可确信不重复字符串组成。这样新文件生成时自动覆盖上一文件。
B：在Global.asa文件中设置Session_onEnd事件激发时，删除这个用户的Excel暂存文件。
C：在Global.asa文件中设置Application_onStart事件激发时，删除暂存目录下的所有文件。
注：建议目录结构\Src代码目录\Templet模板目录\Temp暂存目录
六、附录
出错时Excel出现的死进程出现是一件很头疼的事情。在每个文件前加上“OnErrorResumeNext”将有助于改善这种情况，因为它会不管文件是否产生错误都坚持执行到“Application.Quit”，保证每次程序执行完不留下死进程。
补充两点：
1、其他Excel具体操作可以通过录制宏来解决。
2、服务器端打开SQL企业管理器也会产生问题。
<％
On Error Resume Next
’建立Excel对象
strAddr=Server.MapPath(".")
set objExcelApp=CreateObject("Excel.Application")
objExcelApp.DisplayAlerts=false
objExcelApp.Application.Visible=false
’读取已有Excel文件
objExcelApp.WorkBooks.Open(strAddr&"\Templet\Null.xls")
set objExcelBook=objExcelApp.ActiveWorkBook
set objExcelSheets=objExcelBook.Worksheets
set objExcelSheet=objExcelBook.Sheets(1)
’插入数据
objExcelSheet.Range("B2:k2").Value=Array("Week1","Week2","Week3","Week4","Week5","Week6","Week7","Week8","Week9","Week10")
objExcelSheet.Range("B3:k3").Value=Array("67","87","5","9","7","45","45","54","54","10")
objExcelSheet.Range("B4:k4").Value=Array("10","10","8","27","33","37","50","54","10","10")
objExcelSheet.Range("B5:k5").Value=Array("23","3","86","64","60","18","5","1","36","80")
objExcelSheet.Cells(3,1).Value="InternetExplorer"
objExcelSheet.Cells(4,1).Value="Netscape"
objExcelSheet.Cells(5,1).Value="Other"
objExcelSheet.Range("b2:k5").Select
’objExcelApp.Charts.Add
’objExcelApp.ActiveChart.ChartType=97
’objExcelApp.ActiveChart.BarShape=3
’objExcelApp.ActiveChart.HasTitle=True
’objExcelApp.ActiveChart.ChartTitle.Text="Visitorslogforeachweekshowninbrowserspercentage"
’objExcelApp.ActiveChart.SetSourceDataobjExcelSheet.Range("A1:k5"),1
’objExcelApp.ActiveChart.Location1
’objExcelApp.ActiveChart.HasDataTable=True
’objExcelApp.ActiveChart.DataTable.ShowLegendKey=TrueobjExcelBook.
’另存Excel文件
objExcelBook.SaveAs(strAddr&"\Temp\Excel.xls")
objExcelApp.Quit
set objExcelApp=Nothing
％>
<!DOCTYPEHTMLPUBLIC"-//W3C//DTDHTML4.0Transitional//EN">
<HTML>
<HEAD>
<TITLE>NewDocument</TITLE>
<METANAME="Generator"CONTENT="MicrosoftFrontPage5.0">
<METANAME="Author"CONTENT="">
<METANAME="Keywords"CONTENT="">
<METANAME="Description"CONTENT="">
</HEAD>
<BODY>
</BODY>
</HTML>
0
投稿猜你喜欢
在《数据库原理》里面，对聚簇索引的解释是:聚簇索引的顺序就是数据的物理存储顺序，而对非聚簇索引的解释是:索引顺序与数据物理排列顺序无关。正式- 前端代码要做到简洁易读、高效，还要考虑后端嵌套的方便性。前段时间做了一个导航，把整个制作过程重现，希望对大家有帮助。看到这样的导航，你会怎么
- 一个将人民币数字转化为大写的asp函数，可以准确读出数字的大写，而不是简单的将数字翻译为大写。有了这个工具大家就可以很方便的写出大写的人民币
- MySQL 提供了一个很有意思的Engine：Federated！如果你了解Linux下面的Link的话，就应该很好理解这个Federate
- 其中使用到一个分页类CPaging 代码如下:Class CPaging Public RS
- 显然，效果很实用。对于这个效果，我们并不解释如何去使用效果库，而是讲解如何创建类似的效果，并保持他的可用性，分离式（unobtrusive）
- 看过数据库的备份与还原。大多数都是用组件来完成的。其实可通过sql语句来完成。 由于时间关系，未对参数进行验证和界面美化。代码
- Dreamweaver出现乱码，大致为两种情况：一是没有标明主页制作所用的文字，这种情况下很简单就可以
- XML被设计用来描述数据，其焦点是数据的内容。HTML被设计用来显示数据，其焦点是数据的外观。
- 有2个不同的方法增加用户：通过使用GRANT语句或通过直接操作MySQL授权表。比较好的方法是使用GRANT语句，因为他们是更简明并且好像错
- 在“按需加载”的需求中，我们经常会判断当脚本加载完成时，返回一个回调函数，那如何去判断脚本的加载完成呢？我们可以对加载的 JS 对象使用 o
- 经常在网站上看到诸如www.abc.com/?news或者www.abc.com/?id=123这样的网址，一开始觉得很神秘，其实现在看多了
- 以前写过一个标签效果，外观虽然好看，但代码不太规范，实现的方法比较繁冗。需要注意的是标签的背景图，两种状态，激活的标签背景为蓝色，反之为灰色
- 我们可能会出现这种情况，某个表原来设计不周全，导致表里面的数据数据重复，那么，如何对重复的数据进行删除呢?重复的数据可能有这样两种情况，第一
- 桥接模式Bridge Pattern是什么桥接模式是一种结构型模式，它将抽象部分与实现部分分离开来，使它们可以独立地变化。在桥接模式中，我们
- strSourceFile = Server.MapPath(dataXML&"/Advertisement/"
- 很多人可能发现，无论是在sql 2000， 还是在 sql 2005 中，都没有提供字符串的聚合函数， 所以， 当我们在处理下列要求时，会比
- 内容摘要：为什么要什么XML文件:其优势就是处理该XML数据的文档可以是静态文档，比如HTML文件通过Javascript、XMLDOM来解
- 这片文章只对本地存储方法做介绍，若要查看本地存储组件使用方法的介绍请稍等。本地数据持久化（或者也叫做浏览器本地存储）是一种在浏览器中长久保存
- 这是一个非常简单的解决方案，柱状图中每一条柱都是一个 div，数据的大小呈现在 div 的宽或高上。 查看演示 例子下载实现的原理
