|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。 在企业级使用傍边,咱们常常需求对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$]" 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$]" 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的致命缺点就是不支持跨平台的系统,在大型项目开发和维护上非常困难。 |
|