为何ASP只读出部分EXCEL文件内容

hhlyt 2008-04-05 01:10:24
ASP程序代码如下:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>

<body>
<%
dim excelconn,strAddr,excelrs,sql

set excelconn=server.createobject("adodb.connection")
strAddr = Server.MapPath("./sample.xls")
'输出源文件名
Response.Write "源文件:"&strAddr&"<BR>"
excelconn.open "Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=Excel 8.0;Data Source=" & strAddr

'建立excel记录集
set excelrs=server.createobject("adodb.recordset")

sql="select * from [Sheet1$]"
excelrs.Open Sql,excelconn,1,1
%>
<table>
<%
do while not excelrs.eof
Response.Write("<tr>")
Response.Write("<td>"&excelrs("字段1")&"</td>")
Response.Write("<td>"&CStr(excelrs("字段2"))&"</td>")
Response.Write("<td>"&CStr(excelrs("字段3"))&"</td>")
Response.Write("</tr>")
excelrs.MoveNext
loop
excelrs.close()
set excelrs=nothing
excelconn.Close()
set excelconn=nothing
%>
</table>
</body>
</html>

sample.xls文件内容如下:
字段1 字段2 字段3
1 2 3
a b c

程序运行后的结果如下:
源文件:E:\sample.xls
1 2 3

为何abc没有显示??
...全文
40 点赞 收藏 2
写回复
2 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
lxw81p 2008-04-12
do while not excelrs.eof and not excelrs.bof
回复
hhlyt 2008-04-05
有人知道吗?
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2008-04-05 01:10
社区公告
暂无公告