asp读取excel问题（语法错误 (操作符丢失)
<%
dim conn,strconn,myxh
set conn=server.CreateObject("adodb.connection")
strconn= "Driver={Microsoft Excel Driver (*.xls)};DBQ="& Server.MapPath("book1.xls")
conn.open strconn
myxh=request.Form("nick")
msql="select xh,xm,yw,sx from [sheet1$] where xh="& myxh &""
set rs=conn.execute(msql)
if rs.eof then
response.Write("没找到记录，请查证")
response.Redirect("index1.asp")
else
response.Write("<table border=1>")
response.Write("<tr><td>学号</td><td>姓名</td><td>语文</td><td>数学</td>")
response.Write("<tr><td>"& rs("xh") &"</td><td>"& rs("xm") &"</td><td>"& rs("yw") &"</td><td>"& rs("sx") &"</td>")
end if
%>
----------------------------------------------------------------
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Excel Driver] 语法错误 (操作符丢失) 在查询表达式 'xh=' 中。
/index1.asp, 第 35 行
----------------------------------------------------------------
请帮忙看看是什么地方写错了。
参考答案:参考下面：
dim connxls,connstrxls
connstrxls="DBQ=d:\newexcel.xls;DefaultDir=;DRIVER={Microsoft Excel Driver (*.xls)};"
set connxls=server.createobject("ADODB.CONNECTION")
connxls.open connstrxls
Set rsxls=Server.CreateObject("ADODB.Recordset")
SQLxls = "select * from [new$]"
rsxls.open sQLxls,connXls,1,1
do while not rsxls.eof