不用DSN也能连接EXCEL
vXlFile = Request("XlBook")
vXlFilePath = Server.MapPath(vXlFile)
' 假定文件在当前目录
vConnString = "DRIVER={Microsoft Excel Driver (*.xls)};ReadOnly=1;DBQ=" & _
vXlFilePath
' 读取文件名，转换为全路径并生成连接字符串
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open vConnString
[此贴子已经被作者于2004-10-11 15:12:15编辑过]
