Foxtable(狐表)用户栏目专家坐堂 → 外部临时表排序怎么做的


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

主题:外部临时表排序怎么做的

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


加好友 发短信
等级:幼狐 帖子:140 积分:1202 威望:0 精华:0 注册:2013/7/28 12:10:00
外部临时表排序怎么做的  发帖心情 Post By:2014/5/4 10:06:00 [只看该作者]

外部临时表排序怎么做的
' args(0) 表名称 ,args(1) 后台表名, args(2) 执行SQL 注:这里使用 Select * From Table Order By 排序 DESC  这样操作是起不到排序作用的
If DataTables.Contains(args(0)) = False Then
    Dim q As new OuterTableBuilder
    q.TableName = args(0)
    q.ConnectionName = args(2)
    q.SelectString = Args(1)
    StatusBar.Message1 = "系统正在加载{" & q.TableName & "}数据中!"
    StatusBar.ProgressBar.Visible = True   
    StatusBar.ProgressBar.Value = 50
    q.Build
    StatusBar.Reset
End If
[此贴子已经被作者于2014-5-4 10:10:01编辑过]

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


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

排序设置 SORT属性即可

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


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

楼主,问题回复的质量,取决于你提问的质量,你这样提问,真不知道怎么回复。

 

所有表的排序不都是这样的吗:

 

Tables(" 表名").Sort = "列名"

 

你提问随随便便,敷衍了事,也很难指望得到快速准确的回复。

[此贴子已经被作者于2014-5-4 10:10:56编辑过]

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


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

嗯,你修改帖子了。

 

order只是和top配合使用,例如按日期顺序加载前100行,但是加载后并不会按日期顺序显示,你的设置sort属性:

 

Tables(" 表名").Sort = "日期"


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


加好友 发短信
等级:幼狐 帖子:140 积分:1202 威望:0 精华:0 注册:2013/7/28 12:10:00
  发帖心情 Post By:2014/5/4 10:18:00 [只看该作者]

我知道Table是排序的属性,问题我是调用DataTable

Functions.Execute("动态加载","流转状态","Select * From 流转状态 Order By 排序 ASC ",Vars("Data"))
Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
tab.TabPages.Clear
With DataTables("流转状态")
For Each dr As DataRow In .DataRows
Dim tp As WinForm.TabPage = tab.TabPages.Add(tab.Name & dr("_Identify"),dr("名称"))
Dim tbl As WinForm.Table
tbl = e.Form.CreateSQLTable(tab.Name & dr("_Identify"), "Select 任务编号 ,垫付金额 ,  (Select isnull(count(*),0) From 任务商品 where 任务商品.任务编号 = 任务.任务编号) as 商品数量,订单号 From 任务 Where 发布人 = '" & QQ & "'",Vars("Data"))
tbl.Dock = Windows.Forms.DockStyle.Fill
tp.AddControl(tbl)
If Tables.Contains(e.Form.Name & "_" & tp.Name) Then
With Tables( e.Form.Name & "_" & tp.Name )
.DataTable.GlobalHandler.BeforeShowContextMenu = True
.AllowEdit = False
Functions.Execute("设置表格自定义样式", .Name )
End With
End If
Next
End With
tab.Visible = True

 

已改成Table去取了

[此贴子已经被作者于2014-5-4 10:22:26编辑过]

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


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

设置Tables("流转状态").SORT即可

 回到顶部