帮忙搞个能用的asp连接excel的代码 - 编程论坛

yms1232010-01-29 13:37

https://bbs.bccn.net/viewthread.php?tid=162737&extra=page%3D1%26amp%3Bfilter%3Ddigest
ASP连接Excel根据服务器的设置不同连接方法也是不一样的。

wcwtitxu2010-01-29 15:32

回复 2楼 yms123

程序代码：

<%@ language="jscript" codepage="936" %>
<table border="1">
<%
var connXls = Server.CreateObject("ADODB.Connection");

connXls.Open("Driver={Microsoft Excel Driver (*.xls)};DBQ=C:\\tab.xls");

var rs = connXls.Execute("SELECT * FROM [工作薄$]");

Response.Write("<tr>");
for (var e = new Enumerator(rs.Fields); !e.atEnd(); e.moveNext()) {
    var field = e.item();
    Response.Write("<th>" + field.Name + "</th>");
}
Response.Write("</tr>");

while (!rs.EOF) {
    Response.Write("<tr>");
    for (var e = new Enumerator(rs.Fields); !e.atEnd(); e.moveNext()) {
        Response.Write("<td>" + e.item().Value + "</td>");
    }
    Response.Write("</tr>");
    rs.MoveNext();
}

rs.Close();
connXls.Close();
%>
</table>