- 易表在线答疑 (http://egrid2000.com/dvbbs/index.asp)
-- 用户社区 (http://egrid2000.com/dvbbs/list.asp?boardid=2)
---- 工具栏设计日期 (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=2372)
-- 发布时间：2011/6/3 13:28:00
-- 工具栏设计日期
在进行菜单设置的时候，想在菜单下设置当前登录用户和日期。格式为：
您好！“用户名”，欢迎你登陆管理系统！今天是2011年6月3日，星期五，农历五月初二，现在是：13：20：40（看得见秒往上增加）
请问如何做到。
谢谢！
-- 发布时间：2011/6/3 13:42:00
--
录入窗口可以实现，增加一个计时器。菜单下好像不行。
-- 发布时间：2011/6/3 13:45:00
--
应该可以的吧？
-- 发布时间：2011/6/3 14:19:00
--
最好在文件预处理公式中加载定时器。
-- 发布时间：2011/6/3 14:22:00
--
[这个贴子最后由zss在 2011/06/03 02:27pm 第 1 次编辑]
这是一部分公式：if(Usertype = 1 ， OpenMenu("管理员菜单") and SetLabel("ThisName",username) And SetLabel("date",format(now(),"yyyy-mm-dd")),true)
显示结果是用户名和日期。
-- 发布时间：2011/6/3 15:07:00
--
下面引用由zss在 2011/06/03 02:22pm 发表的内容：
这是一部分公式：if(Usertype = 1 ， OpenMenu("管理员菜单") and SetLabel("ThisName",username) And SetLabel("date",format(now(),"yyyy-mm-dd")),true)
显示结果是 ...
这是一部分公式：if(Usertype = 1 ， OpenMenu("管理员菜单") and SetLabel("ThisName",username) And SetLabel("date",format(now(),"yyyy-mm-dd")),true)
显示结果是 ...
如果要显示时间（秒）的话，要加定时器的。
-- 发布时间：2011/6/3 15:29:00
--
[这个贴子最后由zss在 2011/06/03 03:29pm 第 1 次编辑]
if(Usertype = 1 , OpenMenu("管理员菜单") and SetLabel("ThisName",username) and SetLabel("日期",dateFormat(Today())) And AddTimer("time1",1000,"setlabel(""时间"",DateFormat(Now()))"),true)
-- 发布时间：2011/6/3 15:39:00
--
请问
日期显示格式为：2011年6月3日；
时间显示格式为：15：30
下面这个公式哪点有问题啊？执行后显示结果为：日期 时间。
if(Usertype = 1， OpenMenu("管理员菜单") and SetLabel("ThisName",username) and SetLabel("日期",Format(Today(),"yyyy年mm月dd日")) And AddTimer("time1",1000,"setlabel(""时间"",Format(Now()"Hh:Nn:Ss"))"),true)
如果将以上公式改为:
if(Usertype = 1， OpenMenu("管理员菜单") and SetLabel("ThisName",username) and SetLabel("日期",Format(Today())) And AddTimer("time1",1000,"setlabel(""时间"",Format(Now()))"),true)
显示结果为：2011-6-3 2011-6-3 15:39:40
-- 发布时间：2011/6/3 16:27:00
--
[这个贴子最后由zss在 2011/06/03 04:32pm 第 2 次编辑]
请wjq1072版主帮忙解答一下。谢谢。
if(Usertype = 1 or username="zhengshaosong", OpenMenu("管理员菜单") and SetLabel("ThisName",username) And setlabel("date",format(today(),"yyyy年mm月dd日"))and AddTimer("time1",1000,"SetLabel(""time"",Text(Now()))"),true)
希望实现:
今天是:2011年06月03日，现在是16:32:32
-- 发布时间：2011/6/3 16:39:00
--
自己组合到定时器中
"今天是："+format(today(),"dddddd")+" 现在是："+format(now(),"ttttt")