导入execl中的数据,查询出的表名比看见的多
天上下雨 2009-10-27 04:24:46 用asp查询execl表的名字,本来看见的是'表1-1$''表1-2$''表2-1$''表2-2$'
但是查询出来显示后却是'表1-1$''表1-2$''表2-1$''表2-1$'Print_Area'表2-2$''表2-2$'Print_Area'表2-2$'Print_Titles
不知道是怎么回事?
代码是这样的:
<form name="inexecl" action="openexecl.asp" method="post">
<input type="file" id="test" name="test" accept="text/html">
<input type="submit" name="Submit" value="导入execl数据" />
</form>
<%
if trim(request("test"))<>"" then
db=trim(request("test"))
'response.Write(db)
'response.End()
Set adox = CreateObject("ADOX.Catalog")
Set conn = CreateObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& db &";Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"""
adox.activeConnection = conn
for each table in adox.tables
if table.type="TABLE" then
tname=tname&"<br/>"&table.name
%>
<%=table.name %>
<%
end if
next
%>
<%=tname %>
<%
end if
%>
向各位高手请教呀!!!