以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  没有日期的几行怎么处理  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=65399)

--  作者:cyrollin
--  发布时间:2015/3/15 15:15:00
--  没有日期的几行怎么处理
最上面紫色的几行 能不能 排在有数据行的最下面,不要把他们放最上面去了。

排序代码是这样的: 

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


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

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

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

--  作者:cyrollin
--  发布时间:2015/3/15 15:18:00
--  
我试试
--  作者:cyrollin
--  发布时间:2015/3/15 15:27:00
--  
设置了,现在是这样,排序代码:

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


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

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

--  作者:有点甜
--  发布时间:2015/3/15 15:29:00
--  
Tables("派工表").Sort = "日期排序, 日期, 排序时间"

 

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

--  作者:cyrollin
--  发布时间:2015/3/15 15:31:00
--  
真高明,原来一个顺序就能产生不同的效果。
--  作者:cyrollin
--  发布时间: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
--  发布时间:2015/3/23 11:27:00
--  
不会,是不是没找到符合的DR
搞不定就上例子看看.描述清楚如何出现问题

--  作者:cyrollin
--  发布时间:2015/3/23 11:32:00
--  
好的,我上传了。帮我看下
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar



--  作者:Bin
--  发布时间:2015/3/23 11:42:00
--  
.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table