Foxtable(狐表)用户栏目专家坐堂 → sortkey不能赋值


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

主题:sortkey不能赋值

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


加好友 发短信
等级:五尾狐 帖子:1030 积分:8973 威望:0 精华:0 注册:2015/8/12 16:28:00
sortkey不能赋值  发帖心情 Post By:2020/6/29 11:29:00 [只看该作者]

如下排序代码,希望空白的内容不参与排序。
但发现错误显示sortkey不属于表。
后来在设置标识列后错误消失,但是sortkey始终不能赋值。
去了SQL里面看,这一列数据一致是1,2,3,4,5,6.。。。的排序。

请问为何?

For Each dr As Row In CurrentTable.Rows
    If dr.Isnull(CurrentTable.ColSel) Then
        dr("_SortKey") = 1
    Else
        dr("_SortKey") = 0
    End If
dr.save
Next
Dim tt As String=CurrentTable.Cols(CurrentTable.ColSel).Name
CurrentTable.Sort="_SortKey," & tt

插入行的sortkey 是OK的,但是不能通过代码修改。

图片点击可在新窗口打开查看此主题相关图片如下:capture.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2020/6/29 11:37:25编辑过]

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


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

CurrentTable有可能是窗口表,查询表,没有这个列是正常的。改为具体的表名试试

For Each dr As Row In Tables("xxxx").Rows

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


加好友 发短信
等级:五尾狐 帖子:1030 积分:8973 威望:0 精华:0 注册:2015/8/12 16:28:00
  发帖心情 Post By:2020/6/29 11:43:00 [只看该作者]

试了,依旧不行。不能改sortkey。
这代码是以前就在用的,另外一个数据库OK。只是之前的sortkey是建表就有,这个是后加的标识列。

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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/29 12:22:00 [只看该作者]

    If dr.Isnull(CurrentTable.ColSel) Then
        dr.DataRow.baserow("_SortKey") = 1
    Else
        dr.DataRow.baserow("_SortKey") = 0
    End If


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


加好友 发短信
等级:五尾狐 帖子:1030 积分:8973 威望:0 精华:0 注册:2015/8/12 16:28:00
  发帖心情 Post By:2020/6/29 13:02:00 [只看该作者]

为啥在另外一个项目里面可以直接用?sortkey建立先后有关系吗?


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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/29 13:40:00 [只看该作者]

没有关系。用肯定都可以,赋值一般要通过baserow

 回到顶部