我用上页输入的条件，来修改access数据库的记录，但是老是没有修改。我估计应该是数据库查询那块有问题，那个大人帮看看，谢谢了.
数据表见图片:


 

 <%
  starttime=request("starttime")
  endtime=request("endtime") 
  in0=trim(request("in0"))
  out0=trim(request("out0"))
  namechoice=trim(request("namechoice"))

set rs = server.CreateObject("adodb.recordset")
'sql="select * from tblTurnDay_Detail where date0>=#"&starttime&"# and date0<=#"&endtime&"# and cardid='"&namechoice&"' "
sql="select * from tblTurnDay_Detail where 1=1"
if starttime <>"" then
sql = sql& "and date0 >= #"&starttime&"# "
end if
if endtime <>"" then
sql = sql& "and date0 <= #"&endtime&"# "
end if
if namechoice <>"" then
sql = sql& "and cardid = '"&namechoice&"' "
end if
rs.open sql,conn2,1,3
if rs.eof or rs.bof then
response.Write "没有符合条件的记录"
else
do until rs.eof   
rs("in0") = in0
rs("out0")= out0
rs("strdesc") =""
rs.update
rs.movenext
loop
end if
%>
/** 统计数据 不用看
<table width="95%" border="1" align="center" bordercolor="#FFFFFF" bgcolor="#CCFFCC">
<tr>
<td>姓名</td>
<td>卡号</td>
<td>日期</td>
<td>上班时间</td>
<td>下班时间</td>
<td>考勤状态</td>
<td>备注</td>
</tr>
<%
for i = 1 to rs.recordcount
%>
<tr>
<td><%=rs("cardid")%></td>
<td><%=rs("cardid")%></td>
<td><%=rs("date0")%></td>
<td><%=rs("in0")%></td>
<td><%=rs("out0")%></td>
<td><%=rs("strdesc")%></td>
<td>&nbsp;</td>
</tr>
<%
rs.movenext
if rs.eof then 
exit for
end if
next
%>
</table>
<%rs.close
set rs = nothing
conn2.close
set conn2 = Nothing
response.Write "<script language = javascript>alert('Modify success,修改数据统计如下');</script>"
%>

[ 本帖最后由 xreins 于 2010-1-25 21:16 编辑 ]

自己顶下，怎么只有人看，没有人说话啊

select * from tblTurnDay_Detail where 1=1 and date0 >= #2009-12-26# and date0 <= #2010-1-20# and cardid = '651760'
我试了下，response.write sql 输出上面的那一行，但是实际上我数据还是没有修改

我补充下，如果我的conn文件里面删除
'on error resume next
这一行，就会提示如下错误
错误类型：
ADODB.Field (0x80020009)
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/do.asp

这是数据表的图片

cardid是文本啊，

问题还没解决，自己继续顶一次啊

这个数据库是couns考勤机自带的数据库，我都没改过，我只是连接它啊

问题还没解决，自己继续顶一次啊

怎么就没人帮我回答下啊