Foxtable(狐表) → 用户栏目 → 专家坐堂 → 删除到最后一行也没有的时候提示错误


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

主题：删除到最后一行也没有的时候提示错误
帅哥哟，离线，有人找我吗？
wuxianzuoji41
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：884 积分：7061 威望：0 精华：0 注册：2013/3/5 8:42:00 		删除到最后一行也没有的时候提示错误  发帖心情 Post By：2013/5/14 14:22:00 [只看该作者]

Tables("短信_tblDuanxin").Current.Delete
删除到最后一行也没有的时候提示错误，怎么做一个判断，如果一行也没有了，就不能使用删除了

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


加好友 发短信
等级：七尾狐 帖子：1731 积分：11255 威望：0 精华：0 注册：2011/12/15 22:06:00 		  发帖心情 Post By：2013/5/14 14:28:00 [只看该作者]

for intA = Tables("短信_tblDuanxin").rows.count - 1 to 0 step - 1

Tables("短信_tblDuanxin").rows(intA).delete

next

 

还有个批量删除的方法，你可以找找
 回到顶部
帅哥哟，离线，有人找我吗？
don
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1812 积分：12993 威望：0 精华：14 注册：2008/10/11 18:07:00 		  发帖心情 Post By：2013/5/14 14:28:00 [只看该作者]

Dim r as row = Tables("短信_tblDuanxin").Current
if r isnot nothing  then  r.Delete
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2013/5/14 14:29:00 [只看该作者]

你为什么要这样删除- - 

datatatables("XX").datarows.Clear 就可以了.

如果想有会反悔的机会循环删除行也不是像你这样的.

for each r as row in Tables("短信_tblDuanxin").rows
r.delete
next
 回到顶部
帅哥哟，离线，有人找我吗？
jspta
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：七尾狐 帖子：1731 积分：11255 威望：0 精华：0 注册：2011/12/15 22:06:00 		  发帖心情 Post By：2013/5/14 16:07:00 [只看该作者]

以下是引用Bin在2013-5-14 14:29:00的发言：
你为什么要这样删除- - 

datatatables("XX").datarows.Clear 就可以了.

如果想有会反悔的机会循环删除行也不是像你这样的.

for each r as row in Tables("短信_tblDuanxin").rows
r.delete
next

你这个删除会不会出错？没测试额。因为你每删除一行，行位置发生变化，最后结果可能就是没全部删除完。

 

还有就是，楼主这个的目的是要做什么哪
 回到顶部
帅哥哟，离线，有人找我吗？
Bin
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00 		  发帖心情 Post By：2013/5/14 16:09:00 [只看该作者]

以下是引用jspta在2013-5-14 16:07:00的发言：

你这个删除会不会出错？没测试额。因为你每删除一行，行位置发生变化，最后结果可能就是没全部删除完。

 

还有就是，楼主这个的目的是要做什么哪

FOR EACH是不存在这个问题的.

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