以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- list(of datarow) (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=98971) |
-- 作者:huhu -- 发布时间:2017/4/10 15:58:00 -- list(of datarow) Dim drs1 As List(Of DataRow) = dt.s e l e c t("物料编码=\'" & dr("物料编码").ToString() & "\' and 库位类别 = \'" & dr("U8库位类别").ToString() & "\' ") For Each mr As DataRow In drs1 Dim sql As String = "U pdate [BDU8差值可用数量表] Set BD可用数量=\'" & dr("数量差量").ToString() & "\' 差值=\'" & dr("数量差量").ToString() & "\' where 物料编码=\'" & dr("物料编码").ToString() & "\' and 库位类别 = \'" & dr("U8库位类别").ToString() & "\'and \'" & dr("数量差量") "" Next 红色代码报下面的错误。
|
-- 作者:有点色 -- 发布时间:2017/4/10 16:04:00 -- 返回的是一个数组
Dim drs1 As DataRow() = dt.Select("物料编码=\'" & dr("物料编码").ToString() & "\' and 库位类别 = \'" & dr("U8库位类别").ToString() & "\' ") [此贴子已经被作者于2017/4/10 16:04:18编辑过]
|