文档章节

ASP读取EXL表格数据

伈猿意码
 伈猿意码
发布于 2016/08/11 20:23
字数 404
阅读 5
收藏 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
广州
程序员
私信 提问
PageOffice V4.0 Excel常用的接口对象---Table类

Table 类,代表PageOffice中定义的Excel表格对象。 在PageOffice中,我们把Excel工作表上的任意一块连续的单元格区域定义为一个Table对象。Table 类按照常用的数据库组件中的数据表的概念封装...

山里的红杏
09/11
0
0
PageOffice V4.0 Excel常用的接口对象---Workbook类

Workbook 类代表一个Excel文档,用来动态输出数据到Excel文档并且控制其表格格式及编辑功能。Workbook 对象是PageOffice开发平台定义的Excel数据输出对象,可作为PageOfficeCtrl.SetWriter ...

山里的红杏
09/11
0
0
PageOffice,word常用接口对象--Table类

在做项目的过程中,经常会遇到要把报表导出到Word文件中再打印的情况,而既然是做报表那就免不了要用到表格,即需要在Word文件中插入table。因此,PageOffice开发平台中就添加了此功能。 Ta...

山里的红杏
09/10
0
0
PageOffice中word常用接口对象---Cell类

Cell类代表Word中定义的表格单元格对象,是表格的重要组成部分。要对这个对象进行写入操作时只能通过Table类对象的openCellRC (rowIndex, columnIndex) 方法获取Cell对象,方法中的参数分别代...

山里的红杏
09/11
0
0
Essential Studio Enterprise Edition 2015 v3正式发布[附下

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

Miss_Hello_World
2015/11/02
0
0

没有更多内容

加载失败,请刷新页面

加载更多

没什么启示的启示——《中国生存启示录》读后感4300字范文

没什么启示的启示——《中国生存启示录》读后感4300字范文: 文:夜晨1981。先后两次阅读这本书,第一次是2016年3月,第二次是2018年12月。读了两遍,都有一个理由,就是梁晓声这个名字。不知...

原创小博客
昨天
1
0
ubuntu常用操作

显卡GPU 查看显卡信息sudo lshw -numeric -class video# 查看显卡型号lspci | grep -i nvidia# 查看驱动版本sudo dpkg --list | grep nvidia-*或者 ubuntu-drivers devices#查看显卡...

hc321
昨天
2
0
mysql密码重置

方法一: 在my.ini的[mysqld]字段加入: skip-grant-tables 重启mysql服务,这时的mysql不需要密码即可登录数据库 然后进入mysql mysql>use mysql; mysql>更新 update user set password=pas...

architect刘源源
昨天
6
1
SpringBoot + Mybatis 配置多数据源(Srping boot 二)

前置条件,你已经配置好spring boot+mybatis,可以参考之前的博客 实现逻辑通过注解+aop切面编程来动态更新datasource 第一步,配置多个DataSource server: port: 8080freezing: ...

小海bug
昨天
13
0
连续潜在变量---概率PCA

最大似然PCA 用于PCA的EM算法 贝叶斯PCA 因子分解

中国龙-扬科
昨天
5
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部