例如如下
Dim
r As
Row = Tables("表A").Current
Dim p As
String = IIF(r.DataRow.RowState
= DataRowState.Added, "A#", "U#")
r.Save()
'一定要在保存后合成信息,因为新增行的主键在保存后才生成
Dim msg As
String = p &
"表A"
& "#"
& r("_Identify")
For
Each bd As QQBuddy In QQClient.Buddies
If
bd.Online
Then
QQClient.Send(bd.name, msg)
End
If
Next
这个代码:QQClient.Send(bd.name, msg) ,
好友在线的情况下就进行数据发送
可以理解为 如果好友不在线的情况下 他的数据就没法更新??
QQClient.Send(bd.name, msg,true)
如果设置为TRUE 有些人 长期 不打开系统
数据是否会不断累积在 服务器? 有没有什么影响?