主题：实现这个功能怎么样写代码

upload=table,管理项目1.table]viewFile.asp?ID=5651[/upload]

在单价更新表中,只希望看到最新单价


此主题相关图片如下：qq截图未命名.jpg


如此图  材料编号  A001  的物品，有两个单价，两个更新日期，怎么样实现，自动在 不显示列 中，代码自动对比编号，对比日期，选中 比1-26日 大 的那一行

只希望在单价更新表中看见最新单价，老单价不能删除，保存在数据库中，不进行加载，，，在对比单价是否是新单价时，通过 日期 与 编号 进行对比，同编号的只显示最新日期的单价。

各位大哥，看看。。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table

附件文件

大哥 Find(" 编号 = 'A001' ",

编号很多啊。。。
从A001可以到A999，那要写多少这样的  Find(" 编号 = 'A001' ",","日期 Desc")

我是想自动对比（根据输入的日期，与编号，查表中相同的编号，对比日期，日期小的留下，大的  不在显示列 中就打勾），，
我想只显示每个编号的最新单价，，，
旧单价 在 不在显示列中打勾，打勾后下次打开文件加不会加载了。

想建一个采购物品单价更新表，把所有的物料都放在表中，每一项物料都有唯一的编号，
比如
2010年1月25日  物料编号 A001   单价 5 
2010年2月29日  物料编号 A001   单价 6  

此时表格中A001物料会有两个单价，但只需要最新的，想把1月25日的单价隐藏（不在显示列 中选中），由于有N种物料N个编号，不可能手工筛选，在一个一个去选中,,,想让表格自动对比，自动选中 不在显示列。

用Czy兄的解决了，谢谢CCzy兄

更新单价后，保存，退出，重新打开就可以看不到旧单价了，，，
有办法保存后就达到效果吗？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table

谢谢各位，解决了。

很棒的价格更新表，还可以查看原始单价，做价格波动曲线图，，，，

谢谢了。

呵，好历害。。

各位大哥，还有一个问题

我在项目BeforeLoadOuterTable事件中放此代码
If e.DataTableName = "成品打包信息" then
    Select Case e.User.Group
        Case "数据输入组","查看组"
            e.SelectString = "Select All * From {成品打包信息} Where 不在显示 = True "
        Case "开发组","管理组"
            e.SelectString = "Select All * From {成品打包信息}"
    End Select
End If

当我用开发组与管理组时，能成功打开外部数据表
用数据据输入组与查看组时，出现此错误提示

此主题相关图片如下：qq截图未命名.jpg


如何解决？

难道我是外部数据源的原因？
我用管理组与开发组用户登录没有问题

可以了
用0 或 1

谢谢