设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 2526|回复: 16
打印 上一主题 下一主题

[窗体] [求助]子窗体记录的提醒功能

[复制链接]
跳转到指定楼层
1#
发表于 2007-7-6 18:52:00 | 只看该作者 回帖奖励 |正序浏览 |阅读模式

比如我的这台机器(有时不止一台)离“确定完成日期”还有几天的时候,有没有什么代码,可以让条记录变颜色(红色)。。

希望高手帮帮小第,或者有什么相关的例子也可以,谢谢!!!!!

参照别人的思路:

建一表用以存储设备启用日期,



建一启动窗体,在其加载事件中获取当前日期并与表中日期比较,



如果相差时间间隔等于你预先设定的期限则弹出提醒窗口

有没有人帮帮忙啊?

[此贴子已经被作者于2007-7-6 16:03:00编辑过]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
17#
 楼主| 发表于 2007-7-10 23:43:00 | 只看该作者
一点通老师,我现在试了下,改了下代码又可以啦。。

谢谢你的指教。。。。。。
16#
 楼主| 发表于 2007-7-10 23:07:00 | 只看该作者

一点通老师,我试了你写的代码,还是不行。。


麻烦你看看附件,以结束日期为例试了还是不行。两个条件同时写时,什么都没有显示?

[此贴子已经被作者于2007-7-10 15:11:31编辑过]

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
15#
发表于 2007-7-10 22:02:00 | 只看该作者
[确定日期]>=DateAdd("d",-2,Date()) And [确定日期]<Date()
14#
 楼主| 发表于 2007-7-10 19:37:00 | 只看该作者
再加一个确定日期跟当前日期的比较,这个代码怎么样写?
13#
 楼主| 发表于 2007-7-10 17:40:00 | 只看该作者
谢谢啦!!!!一点通老师,按你的条件还是不行啊,后面那个#2001-1-1#是要换成完成日期的日期吗?
如果按这样的条件连提前的变色的功能也没有啦。。我的思路是:按你上次的提前变色条件。然后加一条当前日期跟确定日期的比较,因为当前日期是变化的。
当前日期>确定日期时记录恢复原来颜色。。我的确定日期就是最后的出货日期。。


[此贴子已经被作者于2007-7-10 11:03:45编辑过]

12#
发表于 2007-7-10 17:26:00 | 只看该作者
要实现这个功能,还要增加一个时间字段"完成日期",因为当超过确定日期并不等于已经出货,也是用一个条件就行了

[确定日期]<=DateAdd("d",2,Date()) And [完成日期]>#2001-1-1#
11#
 楼主| 发表于 2007-7-10 16:21:00 | 只看该作者
一点通老师,你写的代码是可以提前变色。。

但是有个问题就是,如果当前日期>确定日期时,该记录还是有颜色,按道理是已经出货的就要取消变色了。

我加了个条件2就是当前日期>确定日期时,按原色处理,为什么不行啊?希望老师解答一下(在线等!!!!!)

[此贴子已经被作者于2007-7-10 8:43:46编辑过]

10#
 楼主| 发表于 2007-7-7 22:51:00 | 只看该作者
谢谢啊!!按你的方法还是不行啊,我的思路是:按你上次的提前变色条件。然后加一条当前日期跟确定日期的比较,因为当前日期是变化的。
当前日期>确定日期时记录恢复原来颜色。。我的确定日期就是最后的出货日期。。

[此贴子已经被作者于2007-7-10 10:40:42编辑过]

9#
发表于 2007-7-7 21:54:00 | 只看该作者
提前两天变色处理

[确定日期]<=DateAdd("d",2,Date())
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-12 09:03 , Processed in 0.096385 second(s), 35 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表