生日提示 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 生日提示

共有4277人关注过本帖树形打印复制链接主题：生日提示

denghui69986

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：505 积分：3303 威望：0 精华：0 注册：2022/3/25 7:44:00

生日提示

Post By：2023/4/8 14:15:00 [显示全部帖子]

建一个任务栏，做生日提示，从通讯录按照姓名和出生日期提取，试了多次日期代码一直没试出来，总弹窗错误，是不是这句代码用的不对，New Date(Date.Today.Year, dt.Month, dt.Day) 老师帮忙看看那里问题，谢谢

在窗口AfterLoad

'开始生成今日订单情况任务栏显示具体数据

Dim Page As WinForm.TopicPage

Dim cnt1 As Integer = DataTables("通讯录").Compute("Count(姓名)", "出生日期 = #" & New Date(Date.Today.Year, dt.Month, dt.Day) & "#")'通讯录

Page = e.Form.Controls("TopicBar1").Pages.Add("今日提醒", "今日提醒")'一级菜单显示名称

Page.Links.Add("今日生日", "今日生日(" & cnt1 & ")人")'二级菜单显示名称后面引用cnt1变量的分析数据?

[此贴子已经被作者于2023/4/8 15:12:42编辑过]

denghui69986

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：505 积分：3303 威望：0 精华：0 注册：2022/3/25 7:44:00

Post By：2023/4/8 14:47:00 [显示全部帖子]

谢谢

denghui69986

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：505 积分：3303 威望：0 精华：0 注册：2022/3/25 7:44:00

Post By：2023/4/8 16:32:00 [显示全部帖子]

蓝老师，刚把出生日期改了就不提示了，问题截图修改从新发在一楼里面，

denghui69986

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：505 积分：3303 威望：0 精华：0 注册：2022/3/25 7:44:00

Post By：2023/4/9 7:59:00 [显示全部帖子]

怎样加载后提示所有年份当天日期，比如现在生日年份1987-04-08显示提醒，只提取04-08日期显示。要如何实现所有年份当天的日期。现在只能显示本来当天日期，一楼下面截图，谢谢

denghui69986

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：505 积分：3303 威望：0 精华：0 注册：2022/3/25 7:44:00

Post By：2023/4/10 10:21:00 [显示全部帖子]

现在反而一样不显示了

'开始生成今日订单情况任务栏显示具体数据

Dim Page As WinForm.TopicPage

Dim cnt1 As Integer = DataTables("通讯录").sqlCompute("Count(姓名)", "month(出生日期) = " & Date.Today.month & " and day(出生日期) = " & Date.Today.day)'通讯录

Page = e.Form.Controls("TopicBar1").Pages.Add("今日提醒", "今日提醒")'一级菜单显示名称

Page.Links.Add("今日生日", "今日生日(" & cnt1 & ")人")'二级菜单显示名称后面引用cnt1变量的分析数据?

denghui69986

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：505 积分：3303 威望：0 精华：0 注册：2022/3/25 7:44:00

Post By：2023/4/10 11:04:00 [显示全部帖子]

现在可以了，先没保存，谢谢指导

下一主题 >> << 上一主题

主题：生日提示