ASP编程：若何用ASP读取Excel文件

缺点:安全性不是太差了，还行，只要你充分利用系统自带的工具;唯一缺点就是执行效率慢，如何进行网站优化以后，效果会比较好。   在企业级使用傍边，咱们常常需求对Execl停止操作，如读取Execl外面的数据、往Execl里拔出数据等。 1、操作Execl要注重的事项： 1、 办事器端Office的设置装备摆设 以MS Windows2000+IIS为例，要在办事器端装置有MS Office的成员之一Execl，Office的版本没有特别请求。 2、  办事器端散布式COM的设置装备摆设 履行“ DCOMCNFG”号令，选择“使用法式”页的“Microsoft Execl 使用法式”―>“属性”―>“平安性”―>三个选项都选“利用自界说会见权限”，添加“Everyone”权限。 2、起首，先将使用ASP读取Execl的数据(不创立DSN)： 咱们可以全部.xsl文件看做是一个数据库，sheet1、sheet2等分离当作一个自力的表，把A1、B1、C1、…N1看做表的字段。 --创立毗连对象实例ExeclConn Set ExeclConn=Server.CreateObject(“ADODB.Connection”) --使用Open 办法翻开数据库 StrConn="Driver={Microsoft Excel Driver (*.xls)};"&_ "DriverId=790; DBQ="& Server.MapPath("xls文件名") conn.Open StrConn --创立数据集对象Rs并查询数据 Set Rs = Server.CreateObject("ADODB.Recordset") Sql="select * from [Sheet1&#36;]" rs.Open Sql,conn,2,2 详细例子： 1、创立一个表Sheet1（数据库名为Students）    StudentID 姓 名       语 文       数 学       物 理       化 学       地 理     1     李雪青 83 84 76 95 66   2    冯江 87 96 82 100 81   3    吴小霞 76 43 37 60 82   4    邹亚汇 80 77 63 71 63   5    蔡海飞 89 63 92 86 67   2、查询并显示表Sheet1内容的代码 <% Dim conn Dim StrConn Dim rs Dim Sql Set conn=Server.CreateObject("ADODB.Connection") StrConn="Driver={Microsoft Excel Driver (*.xls)};"&_ "DriverId=790; DBQ="& Server.MapPath("Students.xls") conn.Open StrConn Set rs = Server.CreateObject("ADODB.Recordset") Sql="select * from [Sheet1&#36;]" rs.Open Sql,conn,2,2 %> <center> <table border="1"> <tr> <% for i=0 to rs.Fields.Count-1 %>   <td bgcolor="#0099FF"><%=rs(i).Name%></td> <% next %> </tr> <% do while Not rs.EOF %> <tr> <% for i=0 to rs.Fields.Count-1 %>   <td><%=rs(i)%></td> <% next %> </tr> <%   rs.MoveNext   Loop   rs.close   set rs=nothing   StrConn.close   set StrConn=nothing %> </table></center>  结论：和PHP一样，ASP简单而易于维护，很适合小型网站应用，通过DCOM和MTS技术，ASP甚至还可以完成小规模的企业应用，但ASP的致命缺点就是不支持跨平台的系统，在大型项目开发和维护上非常困难。