如何实现ASP页面中显示服务器中的EXCLE

来源:百度知道 编辑:UC知道 时间:2024/05/31 03:17:52
1.我用的是ASP 不是.NET
2.不想通过点击“下载、“打开”之类的,只要直接能显示出EXCLE的内容
这个问题困惑我好几天了请问有什么办法吗?

excelConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&FSPath&FileName&";Extended Properties='Excel 8.0;HDR=NO;IMEX=1'"
Set excelconn = Server.CreateObject("ADODB.Connection")
excelconn.open excelConnStr

On Error Resume Next
Set Cat = Server.CreateObject("ADOX.Catalog")
Set table = Server.CreateObject("ADOX.Table")
Set Cat.ActiveConnection = excelconn
Set rs = Server.CreateObject("ADODB.RecordSet")
Set updat = itNis.RecordSet("select * from It_Transport",1,3)
For Each table In Cat.tables
sql = "select * from ["&table.name&"]"
rs.open sql,excelconn,1,1
Do While Not rs.eof
'add record
updat.addnew
updat("cardid") = rs(1)
updat("customerid") = rs(2)
updat("customer") = rs(3)
updat("