set conn=server.createobject("ADODB.Connection")
connstr="driver={microsoft Excel Driver (*.xls)};dbq=a1.xls;"
conn.open connstr
If Err Then
err.Clear
Set conn = Nothing
Response.Write "数据库连接出错,请检查连接字串。"
Response.End
End If
//到这一步,是正确的,下面我想读里表里的数据,就弄不出来了,大家帮我看看是什么问题
sql="select * from sheet1"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,3,2
rs.addnew
rs("a")="888888"
rs("b")="男"
rs("c")="999999"
rs.update
rs.close
set rs=nothing