Foxtable(狐表)用户栏目专家坐堂 → 关于筛选最大主键列的问题


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

主题:关于筛选最大主键列的问题

帅哥哟,离线,有人找我吗?
狐表(小白)
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:371 积分:4017 威望:0 精华:0 注册:2019/9/17 10:06:00
关于筛选最大主键列的问题  发帖心情 Post By:2020/9/19 22:31:00 [只看该作者]

蓝老师,以下SQL数据库表[test].[dbo].[YW_采购询价]在按钮事件引用时,为什么只有在表内新增的同种物料_代码存在大于或等于两条记录时,才能提取单价?一条时提取不到单价,也无报错,是不是红色字体的代码写的不对?

Dim drs As List(Of DataRow)
drs = DataTables("请购计划二级_Table1").Select("单价 is null")
   For Each dr As DataRow In drs
     Dim i As Integer = Tables("请购计划二级_Table1").FindRow("单价 is null")
     If i >=0 Then
        Dim dz As Row = Tables("请购计划二级_Table1").Rows(i)
        If dz IsNot Nothing AndAlso dz.IsNull("物料_代码")=False AndAlso dz.IsNull("物料_名称") = false AndAlso dz.IsNull("单价") = true Then
           Dim cmd As New SQLCommand
           cmd.C
           cmd.CommandText = "SELECT 物料_单价 F ROM [test].[dbo].[YW_采购询价]  where  物料_代码='" & dz("物料_代码") & "' and 物料_名称='" & dz("物料_名称") & "' and [_Identify] = (SELECT MAX([_Identify]) F ROM [test].[dbo].[YW_采购询价])"
           dz("单价") = cmd.ExecuteScalar()
         End If
     End If
   Next

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


加好友 发短信
等级:小狐 帖子:371 积分:4017 威望:0 精华:0 注册:2019/9/17 10:06:00
  发帖心情 Post By:2020/9/20 9:37:00 [只看该作者]



 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110784 积分:563852 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/9/20 20:34:00 [只看该作者]

cmd.CommandText = "SELECT top 1 物料_单价 F ROM [test].[dbo].[YW_采购询价]  where  物料_代码='" & dz("物料_代码") & "' and 物料_名称='" & dz("物料_名称") & "'  order by [_Identify] desc"

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


加好友 发短信
等级:小狐 帖子:371 积分:4017 威望:0 精华:0 注册:2019/9/17 10:06:00
  发帖心情 Post By:2020/9/20 21:47:00 [只看该作者]

谢谢

 回到顶部