综合排名不高专业排名:Microsoft VBScript 运行时错误 (0x800A01A8) 缺少对象: ''

源代码如下，请帮忙解决
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!-- #include file="Conn.asp" -->
<%
if (Request.ServerVariables("request_method") = "POST") then
Res_name=request("Res_name")
Res_dept=request("Res_dept")
Res_mail=request("Res_mail")
Res_date=request("Res_date")
Res_title=request("Res_title")
Res_start=request("Res_start")
Res_room=request("Res_room")
Res_end=request("Res_end")
Res_desc=request("Res_desc")
if Res_name=empty then
response.write"<script language=JavaScript>{window.alert('对不起，请填写预定人姓名！');window.location.href='javascript:history.go(-1)'}</script>"
end if
if Res_dept=empty then
response.write"<script language=JavaScript>{window.alert('对不起，请选择预定人部门！');window.location.href='javascript:history.go(-1)'}</script>"
end if
if Res_date=empty then
response.write"<script language=JavaScript>{window.alert('对不起，请填写登记日期！');window.location.href='javascript:history.go(-1)'}</script>"
end if
if Res_title=empty then
response.write"<script language=JavaScript>{window.alert('对不起，请填写会议主题！');window.location.href='javascript:history.go(-1)'}</script>"
end if
if Res_start=empty then
response.write"<script language=JavaScript>{window.alert('对不起，请填写会议开始日期！');window.location.href='javascript:history.go(-1)'}</script>"
end if
if Res_end=empty then
response.write"<script language=JavaScript>{window.alert('对不起，请填写会议室编号！');window.location.href='javascript:history.go(-1)'}</script>"
end if
if Res_room=empty then
response.write"<script language=JavaScript>{window.alert('对不起，请填写会议结束日期！');window.location.href='javascript:history.go(-1)'}</script>"
end if

sql="select * from [Res_room] where Res_room='"&Res_room&"' and Res_date='"&Res_date&"'"
Rs.Open sql,Conn,1,3
if Rs.eof then
Rs.addNew
Rs("Res_name")=Res_name
Rs("Res_dept")=Res_dept
Rs("Res_mail")=Res_mail
Rs("Res_date")=Res_date
Rs("Res_title")=Res_title
Rs("Res_start")=Res_start
Rs("Res_end")=Res_end
Rs("Res_room")=Res_room
Rs("Res_desc")=Res_desc
Rs.update
Rs.close
response.write"<script language=JavaScript>{window.alert('会议室已经被成功预定！');window.location.href='javascript:history.go(-1)'}</script>"
else
response.write"<script language=JavaScript>{window.alert('对不起，此会议室已经被预定！');window.location.href='javascript:history.go(-1)'}</script>"
end if

end if
%>
错误类型：
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''
/fuyudgcorp/addmeetingromm.asp, 第 37 行

第 37 行就是代码 Rs.Open sql,Conn,1,3,，急，希望帮忙解决