Foxtable(狐表)用户栏目专家坐堂 → 没有日期的几行怎么处理


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

主题:没有日期的几行怎么处理

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


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
没有日期的几行怎么处理  发帖心情 Post By:2015/3/15 15:15:00 [只看该作者]

最上面紫色的几行 能不能 排在有数据行的最下面,不要把他们放最上面去了。

排序代码是这样的: 

    Tables("派工表").sort = "日期,排序时间"


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

[此贴子已经被作者于2015/3/15 15:16:25编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/15 15:16:00 [只看该作者]

 在加一列排序列,有数据一个值,比如 0,没数据,一个值,比如 1
[此贴子已经被作者于2015/3/15 15:27:22编辑过]

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


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
  发帖心情 Post By:2015/3/15 15:18:00 [只看该作者]

我试试

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


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
  发帖心情 Post By:2015/3/15 15:27:00 [只看该作者]

设置了,现在是这样,排序代码:

Tables("派工表").Sort = "日期,排序时间,日期排序"


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

怎么把上面几行紫色的排在下面来?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/15 15:29:00 [只看该作者]

Tables("派工表").Sort = "日期排序, 日期, 排序时间"

 

[此贴子已经被作者于2015/3/15 15:29:04编辑过]

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


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
  发帖心情 Post By:2015/3/15 15:31:00 [只看该作者]

真高明,原来一个顺序就能产生不同的效果。

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


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
  发帖心情 Post By:2015/3/23 11:20:00 [只看该作者]

以下是引用有点甜在2015/3/15 15:16:00的发言:
 在加一列排序列,有数据一个值,比如 0,没数据,一个值,比如 1
[此贴子已经被作者于2015/3/15 15:27:22编辑过]


前几天这个代码还可以,今天我测试又不行了,TIANTIAN帮我看下这段代码:


If e.DataCol.Name = "客户信息" Then

    Dim dr As DataRow

    dr = DataTables("客户数据").Find("综合信息 = '" & e.DataRow("客户信息") & "'" )

    If dr IsNot Nothing '如果找到, 则设置各列内容

        e.DataRow("日期排序") = "1"

        e.DataRow("新老客户") = "客户改"

        e.DataRow("时间")= dr("时间")

        e.DataRow("支付方式")= dr("支付方式")

        e.DataRow("备注")= dr("备注")

        e.DataRow("签约终止日") = dr("签约终止日")

        e.DataRow("单价") = dr("单价")

    End If

End If


当找到这个客户时,日期排序自动设置为1,前几天还行,今天用,他会自动设置为0了。不知道怎么搞的


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


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

不会,是不是没找到符合的DR
搞不定就上例子看看.描述清楚如何出现问题

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


加好友 发短信
等级:四尾狐 帖子:821 积分:5760 威望:0 精华:0 注册:2015/2/3 22:19:00
  发帖心情 Post By:2015/3/23 11:32:00 [只看该作者]

好的,我上传了。帮我看下
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar



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


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

.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


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