Foxtable(狐表)用户栏目专家坐堂 → 删除空白行


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

主题:删除空白行

帅哥哟,离线,有人找我吗?
blackzhu
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57596 威望:0 精华:15 注册:2008/9/1 9:45:00
删除空白行  发帖心情 Post By:2009/4/15 9:19:00 [只看该作者]

  我记得论坛有一个删除空白行的代码,现在没有找到.请哪位老大提供一下.按钮的和菜单的都要.

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/4/15 9:25:00 [只看该作者]

Dim Filter As String

For Each dc As DataCol In DataTables("表A").DataCols

    If Filter > "" Then

        Filter = Filter & " And "

    End If

    Filter = Filter & dc.Name & " Is Null"

Next

DataTables("表A").DeleteFor(Filter)

 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57596 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2009/4/15 10:22:00 [只看该作者]

以下是引用狐狸爸爸在2009-4-15 9:25:00的发言:

Dim Filter As String

For Each dc As DataCol In DataTables("表A").DataCols

    If Filter > "" Then

        Filter = Filter & " And "

    End If

    Filter = Filter & dc.Name & " Is Null"

Next

DataTables("表A").DeleteFor(Filter)

菜单的有没有?


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/4/15 10:40:00 [只看该作者]

菜单没有,喜欢的话自己加进去即可.

 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57596 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2009/4/15 10:48:00 [只看该作者]

以下是引用狐狸爸爸在2009-4-15 9:25:00的发言:

Dim Filter As String

For Each dc As DataCol In DataTables("表A").DataCols

    If Filter > "" Then

        Filter = Filter & " And "

    End If

    Filter = Filter & dc.Name & " Is Null"

Next

DataTables("表A").DeleteFor(Filter)

 测试好像不起作用.


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/4/15 10:54:00 [只看该作者]

测试有作用

 回到顶部
帅哥哟,离线,有人找我吗?
yuansq
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:80 积分:788 威望:0 精华:0 注册:2008/9/1 11:23:00
  发帖心情 Post By:2009/4/15 11:04:00 [只看该作者]

以下是引用狐狸爸爸在2009-4-15 10:40:00的发言:
菜单没有,喜欢的话自己加进去即可.

可以自己定义系统的默认菜单么,是那种和具体的文件无关的。
或者 给个 类似菜单插件 的功能,可以让用户自己开发的菜单功能应用于所有文件,而不是特定文件。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/4/15 11:07:00 [只看该作者]

以下是引用yuansq在2009-4-15 11:04:00的发言:

可以自己定义系统的默认菜单么,是那种和具体的文件无关的。
或者 给个 类似菜单插件 的功能,可以让用户自己开发的菜单功能应用于所有文件,而不是特定文件。


可以,设计好自己的菜单,保存为模板,替换掉foxtable目录下的System.Ribbon文件即可。

System.Ribbon就是系统菜单的木板文件,系统菜单在启动的时候根据此模板动态生成。


 回到顶部
帅哥哟,离线,有人找我吗?
yuansq
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:80 积分:788 威望:0 精华:0 注册:2008/9/1 11:23:00
  发帖心情 Post By:2009/4/15 11:10:00 [只看该作者]

刚试出来了,不错。

 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  10楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57596 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2009/4/15 13:51:00 [只看该作者]

以下是引用狐狸爸爸在2009-4-15 10:54:00的发言:
测试有作用

我新增了一些空白行,没有任何数据,用你的代码没有用,怎么回事?是用的外部数据源.


 回到顶部
总数 14 1 2 下一页