如何实现每月月底对表A的“第五列”进行批量赋值？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 如何实现每月月底对表A的“第五列”进行批量赋值？

共有4198人关注过本帖树形打印复制链接主题：如何实现每月月底对表A的“第五列”进行批量赋值？

lgz518

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

等级：六尾狐帖子：1411 积分：9727 威望：0 精华：0 注册：2019/6/13 9:57:00

如何实现每月月底对表A的“第五列”进行批量赋值？ 发帖心情

Post By：2021/12/27 12:48:00 [显示全部帖子]

如何实现每月月底对表A的“第五列”进行批量赋值“KK"？

有二个问题：

1.如何实现在项目开判定是否为每月月底，如果是就对表A的“第五列”进行批量赋值“KK"?

2.由于定时设计每月月底执行，是要打开项目，没有打开项目就不能执行，如果在某个月底是放假三天，那超过设定时间，定时设计每月月底执行程序是因超时不执行？这个问题如何解决？

看帮助到期提醒的实例，其例中是开始日期与到期日期进行比对，上面没表字段的日期进行对比，所以不会做，请教老师指导，谢谢

lgz518

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

等级：六尾狐帖子：1411 积分：9727 威望：0 精华：0 注册：2019/6/13 9:57:00

Post By：2021/12/27 14:52:00 [显示全部帖子]

1.专门做个服务端项目，放到服务器24小时运行，代码是放在服务端项目UserLogged？

2，判断每月月底下面代码，报错，要怎么写，请指导，谢谢

Dim Days As Integer = Date.DaysInMonth(Year,Month)

Dim LastDay As Date = New Date(Year,Month,Days)

Dim d As Date=Dim LastDay As Date

If Date.Today.day = d Then

Dim btn As WinForm.Button = Forms("表A定时操作").Controls("Button2")

btn.PerformClick()

End If

主题：如何实现每月月底对表A的“第五列”进行批量赋值？