欢迎您:游客!请先
登录
或
注册
风格
恢复默认设置
|
展区
文件集浏览
图片集浏览
Flash浏览
音乐集浏览
电影集浏览
|
搜索
Foxtable(狐表)
→
用户栏目
→
专家坐堂
→ 如何实现多行即时同步?
新的主题
投票帖
小字报
下一主题 >>
<< 上一主题
共有
1946
人关注过本帖
平板
打印
复制链接
主题:如何实现多行即时同步?
hahahehe21
小
大
1楼
|
信息
|
搜索
|
邮箱
|
主页
|
UC
加好友
发短信
等级:幼狐
帖子:
92
积分:1778
威望:0
精华:0
注册:
2014/4/11 21:10:00
如何实现多行即时同步?
Post By:2018/1/4 21:55:00 [
只看该作者
]
帮助实例的即时同步是单行同步,选中新增或有修改的行点击保存按钮才同步更新该行。如果一次新增多行/修改多行,如何修改代码实现点击一次保存就可即时同步新增的多行,多处修改?
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
下一主题 >>
<< 上一主题
RSS2.0
|
Xhtml无图版
|
Xslt无图版
Copyright © 2000 - 2018
foxtable
.com
Tel: 4000-810-820 粤ICP备11091905号
Powered By
Dvbbs
Version 8.3.0
页面执行时间 0.03125 秒, 5 次数据查询