VFP多线程任务执行系统,独立运作,任务代码简单

2024-05-27 21:17:54 浏览数 (2)

最近遇到了很多的需求,需要开一个执行EXE处理一些事务:

比如

1. 注册用户验证码/发邮件。

2. 企微消息异步处理回复。

3. 订单超时结束

4. 库存同步、通讯录同步、部门同步

5. 每日报表推送

这些都需要任务执行系统,我见过泉州老李,深圳雪心都是写的单线程处理,优点是程序简单,缺点是慢。

有了这个多线程任务执行系统,就可以快速地处理消息发送出去。

昨天反复测试到凌晨一点半,就是更完美的处理错误,很多人都不写错误处理,写程序必须掌握明暗两条线,明线就是正常的业务处理,暗线就是错误处理。

基础设施尤其要做好错误处理。相信用猫框的狐友们深有体会。

本组件支持PRG模式,fxp模式执行

任务prg写法非常简单

代码语言:javascript复制
*--工作类,要实现ExeTask方法
owork_msginfo =CREATEOBJECT("work_test")
owork_msginfo.ExeTask() 

Define Class work_test As Session  
  exetime={}  &&上次执行时间
  taskname="我是测试"
  timespan=60*1000   &&执行间隔毫秒
  *-- 类属性和方法随便添加
  Procedure ExeTask    
      RETURN "ok"  
  Endproc
Enddefine

Exetask 就是要执行的代码,效果如下。

0 人点赞