[此贴子已经被作者于2007-10-11 14:27:46编辑过]
[此贴子已经被作者于2007-10-11 14:27:46编辑过]
这段代码的目的是为了判断数据库(ship)中的NewDate是否存在相同,如果存在,即提示“对不起,此天的船舶动态表已存在,请您修改或重新建立”的错误信息,如果没有,即写入新的登记表信息。目的是为了阻止与当天相同的表被写入库中,以达到限制一天内出现相同的登记表。现在老是出错,请问错在哪??NewDate是日期型字段,由用户输入的日期,同时也是在网页中显示的信息标题,通过点击Newdate,可显示一张数据报表。
<%
founderr=false
if request.form("Duty")="" then
errmsg=errmsg+"<br>"+"<li>请输入值班人员名字!"
founderr=true
else
Duty=trim(request.form("Duty"))
end if
if request.form("NewDate")="" then
errmsg=errmsg+"<br>"+"<li>请调整时间格式!"
founderr=true
else
NewDate=trim(request.form("NewDate"))
end if
if founderr=true then
call error()
else
sql="select * from ship where NewDate='"&NewDate&"'"
rs.open sql,conn,1,3
if not rs.eof or NewDate=NewDate then
errmsg="<br>"+"<li>对不起,此天的船舶动态表已存在,请您修改或重新建立。"
founderr=true
else
rs.addnew
rs("Duty")=Duty
rs("NewDate")=NewDate
........
[此贴子已经被作者于2007-10-11 14:39:38编辑过]