新微赢技术网

标题: 请问如何比较日期数据 [打印本页]

作者: 小新就是我 时间: 2009-12-27 03:21
标题: 请问如何比较日期数据
recdate=2006-11-11 为数据库内的日期

date()=2006年-11-12 为当前电脑日期

要对 recdate 和 date() 进行比较，比如 recdate=date() 怎么做？

谢谢！

作者: 踏破^ō^凌云 时间: 2009-12-27 03:21
<%
if year(recdate)+month(recdate)+day(recdate)<>year(date())+month(date())+day(date()) then
%>
可以录入
<%
else
%>
不允许录入
<%
end if
%>

成功了，谢谢二楼的做人很低调。
我用了这个笨办法，成功了。呵呵。大家不要见笑啊，俺不懂程序。

作者: 满天星 时间: 2009-12-27 03:21
请问如何比较日期数据recdate=2006-11-11 为数据库内的日期

date()=2006年-11-12 为当前电脑日期

<%=recdate%><%=date()%> 输出显示为2006-11-112006-11-12

要对 recdate 和 date() 进行比较，比如 recdate=date()

比较他们是为了下面的判断语句
<%
if recdate=date() then
%>
可以录入
<%
else
%>
不允许录入
<%
end if
%>

不过我写的执行不了。不知道为什么。

作者: 风忠人 时间: 2009-12-27 03:21
报什么错了?

作者: √sdf 时间: 2009-12-27 03:21
<%
sub checkdate(one,two)
a=year(one)
b=year(two)
if a=b then
a = month(one)
b = month(two)
if a=b then
a = day(one)
b = day(two)
if a=b then
response.Write("等于")
elseif a>b then
response.Write("大于")
else
response.Write("小于")
end if
elseif a>b then
response.Write("大于")
else
response.Write("小于")
end if
elseif a>b then
response.Write("大于")
else
response.Write("小于")
end if
end sub
set rs = server.CreateObject("adodb.recordset")
sql = "select * from userinfo"
rs.open sql,conn,1,1
n=rs("time")
m=date()
checkdate n,m
%>

这样写应该很好理解吧....

作者: 嫣幻霏然 时间: 2009-12-27 03:21
今天就要用，麻烦各位了。

作者: 踏破^ō^凌云 时间: 2009-12-27 03:21
<%
if recdate=date() then
%>
可以录入
<%
else
%>
不允许录入
<%
end if
%>

我要象上面那样比较，写个判断语句。不是比他们的大小显示大于等于的。
在麻烦看下啊。
我按照上面我写的，输入不起作用。比不了。

作者: Ｉしovのyou 时间: 2009-12-27 03:21
谢谢，我试下哦。

作者: 王者风范 时间: 2009-12-27 03:22
日期可以直接比较呀

作者: lala 时间: 2009-12-27 03:22
怎么直接比较？麻烦告诉下。直接的。

欢迎光临新微赢技术网 (http://bbs.weiying.cn/)