不是不想贴代码，是因为复制了在这里粘贴不了

．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．
Set conn = Server.CreateObject("adodb.connection")
Conn.Mode = 3
conn.open "Driver={Microsoft Excel Driver (*.xls)};" & "DBQ=" & Server.MapPath( "11.xls" )
sql="update [Sheet1$] set a=1 where b=1"
conn.execute(sql)
．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．．
错误提示：
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'

[Microsoft][ODBC Excel Driver] 操作必须使用一个可更新的查询。 /exc.asp，行 7