对数据表中的数据进行排序

[fwy12]

我的表单中有个数据表，里面有很多字段，如编号，名称，日期。

我想加一个下拉的文本框，里面有按编号排序，按日期排序，


请问这样的代码改如何写。

[qd163]

1、表单的load事件中添加如下代码：
IF USED("数据表")
SELECT 数据表
ELSE
USE 数据表 ALIAS 数据表 IN 0
ENDIF
2、添加combo1控件，设置如下：
rowsourcetype=1
rowsource="编号,名称,日期"
3、在combo1的int事件中添加如下代码：
thisform.grid1.RecordSourceType = 0
thisform.grid1.RecordSource ="sjs"
4、在combo1的interactivechange事件中添加如下代码：
cItem=ALLTRIM(this.DisplayValue )
SELECT * FROM 数据表 ORDER BY &cItem INTO CURSOR temp
thisform.grid1.RecordSourceType=1
thisform.grid1.RecordSource ="temp"
thisform.grid1.Refresh

[qd163]

1、表单的load事件中添加如下代码：
IF USED("数据表")
SELECT 数据表
ELSE
USE 数据表 ALIAS 数据表 IN 0
ENDIF
2、添加combo1控件，设置如下：
rowsourcetype=1
rowsource="编号,名称,日期"
3、在combo1的int事件中添加如下代码：
thisform.grid1.RecordSourceType = 0
thisform.grid1.RecordSource ="数据表" **上面的在此处有点错误
4、在combo1的interactivechange事件中添加如下代码：
cItem=ALLTRIM(this.DisplayValue )
SELECT * FROM 数据表 ORDER BY &cItem INTO CURSOR temp
thisform.grid1.RecordSourceType=1
thisform.grid1.RecordSource ="temp"
thisform.grid1.Refresh

[unlist]

&&下拉框,click事件
t_id=this.value
set order to &t_id
thisfrom.grid1.refresh

[cbl518]

自动增量值的字段,只读并且不能被插入、更新或替换操作更改。