asp读取excel表名的实现代码

看代码：复制代码代码如下: <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% dim conn,rs,excelFileName excelFileName=Server.MapPath("Data/test.xls") set conn = Server.CreateObject("ADODB.Connection") conn.connectionstring="Provider=Microsoft.Jet.OleDb.4.0;Persist Security Info=True;Data Source=" & excelFileName & ";Extended ProPerties=""Excel 8.0;HDR=Yes;IMEX=1"";" conn.open() set rs=conn.OpenSchema(20) %> <!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=utf-8" /> <title>Excel操作</title> </head> <body> <% dim i response.write("Excel表信息字段： ------------------------ ") for i=0 to rs.fields.count-1 step 1 response.write(rs.fields(i).name&" ") next response.write(" Excel中的表名(Table_Name)： ------------------------ ") while not rs.EOF response.write(rs("Table_Name")&" ") rs.movenext wend %> </body> </html>

　　推荐阅读

　　ASP FSO显示特殊文件夹的实现代码(畸形目录名、UNC路径)

这个目前还是有个别无法显示，翻了下msdn貌似没看到更好的解决方案，暂时放弃继续研究，有晓得完全解决的朋友不妨回复说一声。先附bat创建畸形目录，以下代码复制另存为a.bat：复制代码代码如下: md aux\ md c>>>详细阅读

本文标题：asp读取excel表名的实现代码

地址：http://www.17bianji.com/kaifa2/ASP/31795.html

1/2 1