我从表单中读取日期，向判断它跟数据库中的日期有没有重复（数据库中riqi字段是日期/时间型的，access数据库），没有重复则允许添加，否则不能添加。
不过我写的代码好像不起作用，请大家帮忙看看哪里出问题了
请大家指教：谢谢！！！！！！！！！
<%dim riqi
riqi=trim(Request.Form("rbyear"))&"-"&right( "0"&trim(Request.Form("rbmonth")),2)&"-"&right( "0"&trim(Request.Form("rbday")),2)
%>
......
application("riqi")=riqi
......
<% set rs = server.CreateObject ("adodb.recordset")
    sql = "select * from ribao where bumen='"&application("bumen")&"' and riqi="&application("riqi")
 rs.Open sql,conn,1,3
 if not rs.eof then%>
 <script language="javascript">
 alert("错误：不能重复添加日报表！");
 location.href="javascript:history.back()"
 </script>
 <% else
......

请大家帮小弟一把啊，谢谢！！！

sql = "select * from ribao where bumen='"&application("bumen")&"' and riqi="&application("riqi")
你这句的意思是:查找bumen='"&application("bumen")和"' and riqi="&application("riqi")同时成立的结果集
and改成or