急！！！语法错误 (操作符丢失)
<!--#include file="conn.asp"--><%
dim d_number, d_name, adress, phone
d_number=trim(request("d_number"))
d_name=trim(request("d_name"))
adress=trim(request("adress"))
phone=trim(request("phone"))
set rs=server.CreateObject("adodb.recordset")
sql="select * from dept where d_number=" &d_number
rs.open sql, conn,1,3
%>
哪位高手帮忙解决一下啊！！！
<%
if not rs.eof then
rs("d_number")=d_number
rs("d_name")=d_name
rs("adress")=adress
rs("phone")=phone
rs.update
rs.close
set rs=nothing
response.write "<script language='javascript'>window.confirm('该部门成功修改')</script>"
response.Redirect"dept_manege.asp"
else
response.Write"改部门不存在"
response.End
end if
%>
错误类型：
Microsoft JET Database Engine (0x80040E14)
语法错误 (操作符丢失) 在查询表达式 'd_number=' 中。
/bysj/mod_dept1.asp, 第 11 行
