Dim Conn,Driver,DBPath,Rs
' 建立Connection对象
Set Conn = Server.CreateObject("ADODB.Connection")
Driver = "Driver={Microsoft Excel Driver (*.xls)};"
DBPath = "DBQ=" & Server.MapPath( "test.xls" )
'调用Open 方法打开数据库
Conn.Open Driver & DBPath
如果这个驱动不好使也可以用oledb 4.0还要开开win7的iis32位应用程序池!
和操作数据库一样读取EXCEL,将数据读到网页! 这只是一种思路,还有交互的方式,给你个地址,你自己去看看
http://hi.baidu.com/eastlin/blog/item/0059d4c4188225a88326ac6e.html
或
http://hi.baidu.com/colzw/blog/item/ed594efac248339e58ee9050.html
一旦打开conn 剩下的
set rs=server.createobject("adodb.recordset")
sql="select * from [sheet1]" 注意这里是关键 sheet1 是excel的默认表 如果不是这个表名要换成真实表名 加where条件和access没区别!
rs.open sql,conn,1,1
剩下的不用我写了吧?