主题：推送消息问题

我想把这个表的消息推送给这个人  定时器里面的代码要怎么写 5分钟执行一次 如果有新的消息就提示

此主题相关图片如下：111.png

帮忙我没看懂 求代码 .....

不知道代码怎么写 能不能给个具体代码 思路我明白 就是不知道代码怎么写

我用的不是QQClient 不用这个怎么写  限制了20人没办法用 

我看了这个帮助 我就是没有看明白  

Dim flt As String
Dim drs As List(Of DataRow)
flt = "接收者 = '" & User.Name & "' And 接收时间 Is Null"
drs = DataTables("信息表").AppendLoad(flt, False)
For Each dr As DataRow In drs
    dr("接收时间") = Date.Now()
    dr.Save()
Next

 

没有提示信息啊 我昨天测试了 也没明白 没有接收到信息