新手请教：我想在图中下面那个表里面进行筛选，选出名称不同的产品显示在上面grid1中，如果名称相同，取最后一条记录。请问如何实现？
Select *;
    From gy where 产品id in (;
        select Max(产品id) from gy where 客户id = lnNum group by 产品编号;
        );
    Into Cursor tmp;
    Order by 单号
   
Select tmp
thisform.grid1.RecordSource="tmp"


这样好像不行

[此贴子已经被作者于2016-5-16 18:38编辑过]

没图呢，显示不显示？

请大家帮帮忙，谢谢

[此贴子已经被作者于2016-5-16 18:39编辑过]

VFP什么版本

vfp9

CREATE CURSOR tt (单号 C(10),产品名称 C(20))
INSERT INTO TT VALUES ("18","礼品1")
INSERT INTO TT VALUES ("19","礼品2")
INSERT INTO TT VALUES ("3","礼品3")
INSERT INTO TT VALUES ("4","礼品3")
INSERT INTO TT VALUES ("5","礼品3")
INSERT INTO TT VALUES ("20","礼品3")
INSERT INTO TT VALUES ("6","礼品4")
INSERT INTO TT VALUES ("9","礼品4")
INSERT INTO TT VALUES ("12","礼品4")
INSERT INTO TT VALUES ("7","礼品5")
INSERT INTO TT VALUES ("8","礼品5")
=SYS(3099,70)
select *,max(recno()) xh from tt group by 产品名称 && 表格控件中，可以不显示XH字段
*或者
select 单号,产品名称 from (select *,max(recno()) xh from tt group by 产品名称) aa

select *,recno() xh from tt INTO CURSOR tt1
SELECT * FROM tt1 WHERE xh in (SELECT MAX(xh) FROM tt1 GROUP BY 产品名称)
再试试这个代码

解决了，谢谢！！
现在想把临时表中的某条记录复制到下面的表中，下面代码有点乱。请帮我看看。
Select tmp
Copy To C:\a For lnId = 产品id Fields Except 产品id
replace 日期 With Date()
Replace 单号 With lnNewNum
=Tableupdate(1,.T.)

Select gy
Append From C:\a
thisform.Refresh

就是可以把临时表的数据作为复制的源数据，复制到原来的表中，相当于重新下订单一样。

[此贴子已经被作者于2016-5-16 21:31编辑过]

INSERT INTO GY SELECT * FORM TMP
前后两表的字段名与列数要完全一样

但是临时表不是多了一个字段xh吗