Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于table表的行数限制


  共有1655人关注过本帖树形打印复制链接

主题：关于table表的行数限制
帅哥哟，离线，有人找我吗？
ygg8310
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：989 积分：8833 威望：0 精华：0 注册：2016/4/10 14:33:00 		关于table表的行数限制  发帖心情 Post By：2024/6/24 10:58:00 [只看该作者]

如何限制内部表的行数？防止内部表无限制的增长？例如内部表行数限制在500行超过500行将无法用任何方法新增行

 回到顶部
帅哥哟，离线，有人找我吗？
cd_tdh
 小大  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐精 帖子：3217 积分：21371 威望：0 精华：0 注册：2016/3/28 16:57:00 		  发帖心情 Post By：2024/6/24 11:13:00 [只看该作者]

先用代码获取表行数，DataTables("表A").DataRows.Count，在判断，如果大余500行，禁止新增
[此贴子已经被作者于2024/6/24 11:13:45编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
ygg8310
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：989 积分：8833 威望：0 精华：0 注册：2016/4/10 14:33:00 		  发帖心情 Post By：2024/6/24 11:16:00 [只看该作者]

禁止新增行代码是啥？

 回到顶部
帅哥哟，离线，有人找我吗？
cd_tdh
 小大  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐精 帖子：3217 积分：21371 威望：0 精华：0 注册：2016/3/28 16:57:00 		  发帖心情 Post By：2024/6/24 11:17:00 [只看该作者]

你代码写在那儿？还是要禁用新增按钮？
Dim n As Integer = DataTables("表A").DataRows.Count
If n >= 500 Then
    e.Cancel = True
    Return
Else
    Tables("表A").AddNew()
End If 
[此贴子已经被作者于2024/6/24 11:21:54编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110867 积分：564285 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/6/24 11:57:00 [只看该作者]

参考：http://www.foxtable.com/webhelp/topics/0629.htm

BeforeAddDataRow事件

If e.DataTable.datarows.count >= 500 Then
    e.Cancel = True '那么取消输入并提示用户
    Messagebox.Show("领导说了，如果大余500行，禁止新增！","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
 回到顶部
帅哥哟，离线，有人找我吗？
ygg8310
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：989 积分：8833 威望：0 精华：0 注册：2016/4/10 14:33:00 		  发帖心情 Post By：2024/6/24 12:23:00 [只看该作者]

学习了，谢谢

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04102 秒, 4 次数据查询