文档章节

ASP读取EXL表格数据

伈猿意码
 伈猿意码
发布于 2016/08/11 20:23
字数 404
阅读 4
收藏 0

在维护旧OA的过程中,客户需要添加一个新功能,简单点就是通过导入exl,然后读取到里面的数据,节省录入的时间。

开始的时候想通过js导入exl数据到表单里面,上网百度了一下,没找到一个能用的。即使可以使用,也存在兼容问题。所以使用了一下方法

<%
dim conn1    '定义第二个连接变量
set conn1=CreateObject("ADODB.Connection")  
conn1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=;Extended properties=Excel 5.0;Data Source="&Server.MapPath("../UserInfo/user.xls")'要导入的EXCEL表名称Fang.xls

sql = "SELECT * FROM [Sheet1$]"      '要导入的Excel数据里面的表的名称,后面一定要加$
set rs = conn1.execute(sql)  
while not rs.eof 
Response.Write  "0"&rs(0)&"<Br>"  
Response.Write  "1"&rs(1)&"<Br>"  
Response.Write  "2"&rs(2)&"<Br>"  
Response.Write  "3"&rs(3)&"<Br>"  
Response.Write  "4"&rs(4)&"<Br>"  
Response.Write  "5"&rs(5)&"<Br>"  
Response.Write  "6"&rs(6)&"<Br>"  
Response.Write  "7"&rs(7)&"<Br>"  
Response.Write  "8"&rs(8)&"<Br>"  
Response.Write  "9"&rs(9)&"<Br>"  
Response.Write  "10"&rs(10)&"<Br>"  
Response.Write  "11"&rs(11)&"<Br>"  
Response.Write  "12"&rs(12)&"<Br>"  
Response.Write  "13"&rs(13)&"<Br>"  
Response.Write  "14"&rs(14)&"<Br>"  
Response.Write  "15"&rs(15)&"<Br>"  
Response.Write  "16"&rs(16)&"<Br>"  
Response.Write  "17"&rs(17)&"<Br>"  
Response.Write  "18"&rs(18)&"<Br>"  
Response.Write  "19"&rs(19)&"<Br>"  
Response.Write  "20"&rs(20)&"<Br>" 
Response.Write  "21"&rs(21)&"<Br>"  
Response.Write  "22"&rs(22)&"<Br>"
Response.Write  "23"&rs(23)&"<Br>"
Response.Write  "24"&rs(24)&"<Br>"
Response.Write  "25"&rs(25)&"<Br>"  
rs.movenext  

Response.Flush  
wend  
set rs = nothing

sql2 = "SELECT * FROM [Sheet2$]"   '导入的Excel数据里面的Sheet表的数据
set rs2 = conn1.execute(sql2)  
while not rs2.eof 
Response.Write  "0"&rs2(0)&"<Br>"  
Response.Write  "0"&rs2(1)&"<Br>"  
Response.Write  "0"&rs2(2)&"<Br>"  
Response.Write  "0"&rs2(3)&"<Br>" 
rs2.movenext  
Response.Flush  
wend  
set rs2 = nothing


conn1.close  
set conn1 = nothing  


%>

如果哪位有更加好的方法欢迎分享,尤其是js读取exl方面。

© 著作权归作者所有

共有 人打赏支持
伈猿意码
粉丝 5
博文 27
码字总数 9727
作品 0
广州
程序员
Essential Studio Enterprise Edition 2015 v3正式发布[附下

使用Essential Studio企业版,开发者可以创建丰富的应用程序,并轻松地集成商业智能分析和报告解决方案。Essential Studio企业版是世界级的软件组件,它使得开发者能在最苛刻的环境下开发出高...

Miss_Hello_World
2015/11/02
0
0
jQuery Grid

jQuery Grid 能够在 ASP.NET MVC 中轻松地实现分页、 排序、 筛选以及 jQuery 插件网格中的 CRUD 操作。 具有以下特征: 时尚的表格数据呈现控件。 JavaScript 控件用于表示和处理 web 上的表...

大胖森
2015/05/05
27.2K
9
JQuery FlexiGrid的asp.net完美解决方案:dotNetFlexGrid-asp.net原生的异步表格控件登录 开源中国

dotNetFlexGrid- Web2.0 asynchronous grid control for asp.net What is it? dotNetFlexGrid是一款asp.net原生的异步表格控件,他的前身是Jquery FlexiGrid插件,我们重构了FlexiGrid的大部......

磊华
2010/08/23
0
0
高效界面开发:ASP.NET MVC报表无与伦比的设计时体验

Web报表设计器 可以在浏览器客户端查看和编辑JavaScript/HTML5报表设计器。 在线Demo 主从报表 DevExpress ASP.NET MVC Reporting控件可以创建复杂的分层主从报表。本示例演示了一个展示了表...

百mumu
2016/06/17
35
0
分享两款.NET电子表格组件的使用心得

大家早已习惯了电子表格带来的方便,对表格的需求也越来越高。作为一个开发人员,我尝试了多款表格控件,SpreadsheetGear和Spread.NET这两款软件是我认为比较好用的,下面就我对这两款表格控...

yidongkaifa
2014/09/23
202
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

Ubuntu18.04 显卡GF-940MX安装NVIDIA-390.77

解决办法: 下面就给大家一个正确的姿势在Ubuntu上安装Nvidia驱动: (a)首先去N卡官网下载自己显卡对应的驱动:www.geforce.cn/drivers (b)下载后好放在英文路径的目录下,怎么简单怎么来...

AI_SKI
今天
3
0
深夜胡思乱想

魔兽世界 最近魔兽世界出了新版本, 周末两天升到了满级,比之前的版本体验好很多,做任务不用抢怪了,不用组队打怪也是共享拾取的。技能简化了很多,哪个亮按哪个。 运维 服务器 产品 之间的...

Firxiao
今天
1
0
MySQL 8 在 Windows 下安装及使用

MySQL 8 带来了全新的体验,比如支持 NoSQL、JSON 等,拥有比 MySQL 5.7 两倍以上的性能提升。本文讲解如何在 Windows 下安装 MySQL 8,以及基本的 MySQL 用法。 下载 下载地址 https://dev....

waylau
今天
0
0
微信第三方平台 access_token is invalid or not latest

微信第三方开发平台code换session_key说的特别容易,但是我一使用就带来无穷无尽的烦恼,搞了一整天也无济于事. 现在记录一下解决问题的过程,方便后来人参考. 我遇到的这个问题搜索了整个网络也...

自由的开源
今天
3
0
openJDK之sun.misc.Unsafe类CAS底层实现

注:这篇文章参考了https://www.cnblogs.com/snowater/p/8303698.html 1.sun.misc.Unsafe中CAS方法 在sun.misc.Unsafe中CAS方法如下: compareAndSwapObject(java.lang.Object arg0, long a......

汉斯-冯-拉特
今天
4
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部