主题：推送消息问题

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

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

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

定时器时间间隔设定为 60*5*1000 毫秒不就行了？

 

循环每一行，把内容发送出去，然后标记此行已发送/或者把此行删除。

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

For Each dr As DataRow In DataTables("表A").Select("已发 = false")
    QQClient.Send(dr("第一列"), dr("第三列"), True)
    dr("已发") = True
Next

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

参考

 

http://www.foxtable.com/help/topics/2265.htm

 

如果你要做内部通信，参考下面的例子
 
未读消息提醒
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=34006
 
仿QQ列表
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=33931

纯后台内部通讯
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=29768

QQ聊天软件
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=52825&skin=0

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

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

 

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

 1、你代码写到计时器里去了吗？

 

 2、这段代码要这样测试：两个客户端要连接同一个数据库，然后一个客户端在信息表新增行，填入数据，指定接收者(加载条件你可以去掉接收者的条件)，保存；然后，另一个客户端，等候刷新即可。