Question

VFP 时间问题

在VFP中 每个表单都有时间的限制，即在登录界面表单登录可以进入另一个表单，但是有时间限制，在什么日期段可以进去此表单，超过这个日期则无法进去。请问，代码该怎么写？本人小白，求高手指教
例如：从5月号到5月7号可以打开一个表单，超过这个时间则不能打开

Answer 1

假设5月1日凌晨0点0分-5月7日凌晨0点0分可以打开要用的表单，其他时间打不开。

SET DATE ANSI
X={^2010-05-04,00:00:00 PM}-DATETIME()
IF X>=-302400 AND X<=302400 &302400是秒数，表示3天半时间
DO FORM 要打开的表单名
ELSE
=MESSAGEBOX("当前时间不能进入...系统！",0)
ENDIF

Answer 2

加上这么一句就可以了。如在上午8：00到晚上8：00
if between(time(),"08:00","20:00")
do form 表单文件 &也就是你题目中说的可以进入另一个表单
else
=messagebox("时间限制")
endif

Answer 3

在表单的初始事件(init)中：
if month()=5 and day()>=1 and day()<=7 &&判断时间

else
messagebox("对不起，这段时间不能打开系统！")
thisform.release &&退出系统登陆

Answer 4

可以用timer控件替代，不是太明白你的意思