繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP直接调用EXCEL数据的例子（不用ODBC）
- ASP
- FrontPage 2000+DB2实现数据库信息发布
- Execel文件插入到ASP页面
- 利用ASP在客户端注册DLL文件
- 1栏分页显示（附显示的形式前页，后页）
- 1栏分页显示（附显示的形式[1][2]）
- 一个基于web的QQ程序 2（xml+asp）
- XMLHTTP+javascript+Asp写得聊天室，无刷新实现（一）
- XMLHTTP+javascript+Asp写得聊天室，无刷新实现（二）
- XMLHTTP+javascript+Asp写得聊天室，无刷新实现（三）
- XMLHTTP+javascript+Asp写得聊天室，无刷新实现（四）
- XMLHTTP+javascript+Asp写得聊天室，无刷新实现（五）
- XMLHTTP+javascript+Asp写得聊天室，无刷新实现（六）
- 建立一个广告交换及跟踪系统
- 如何制作无状态的ASP组件
- 无组件文件上传代码实例
- 建立动态下拉式选单(三阶层)
- 用ASP编写的“俄罗斯方块游戏”
- 利用ASP.NET来访问Excel文档
- 初探SSI网页制作
- 具有自攻击性的代码
ASP直接调用EXCEL数据的例子（不用ODBC）
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 39 ::
收藏到网摘: n/a
在"c:\excel\book1.xls"存在一个EXCEL表book1.xsl,表的结构如下：
1 序号 名称 金额
2 1 张三 100
3 2 李四 200
4 3 王五 300
序号字段不为空
注意：excel 起始行是1而不是为0
<%@language=vbscript %>
<%
Set xlApp = server.CreateObject("Excel.Application")
strsource = "c:\excel\book1.xls"
Set xlbook = xlApp.Workbooks.Open(strsource)
Set xlsheet = xlbook.Worksheets(1)
i=1
response.write "<table cellpadding=0 cellspacing=0 border=1 width=500>"
while xlsheet.cells(i,1)<>""
response.write "<tr>"
response.write " <td height=20 align=center width=100>" & xlsheet.Cells(i, 1) & "</td>"
response.write " <td height=20 align=center width=200>" & xlsheet.Cells(i, 2) & "</td>"
response.write " <td height=20 align=center width=200>" & xlsheet.Cells(i, 3) & "</td>"
response.write "</tr>"
i=i+1
wend
response.write "</table>"
set xlsheet=nothing
set xlbook=nothing
xlApp.quit '千万记住要加这一句，否则每运行一次你的机器里就增加一个excel进程，而且无法释放。我试过"set
xlApp=nothing"是不行的。
%>
评论 (0) All
