Foxtable(狐表)用户栏目专家坐堂 → [求助] DataRow 转成row 出错


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

主题:[求助] DataRow 转成row 出错

帅哥哟,离线,有人找我吗?
leoli
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:301 积分:2547 威望:0 精华:0 注册:2018/11/15 12:35:00
[求助] DataRow 转成row 出错  发帖心情 Post By:2020/6/27 22:57:00 [只看该作者]




如图,
图片点击可在新窗口打开查看此主题相关图片如下:捕获.png
图片点击可在新窗口打开查看
请老师纠正一下,谢谢。
If e.Col.Name = "Priority" Then
              Dim cmd As new SQLCommand
           Dim dt As DataTable
            cmd.CommandText = "Se lect * From {t_SupplyEntry} Where FItemID = '" & e.Row ("FItemID") & "'and FPrioritized = 1 "
            cmd.C
            Dim Values = cmd.ExecuteValues
            dt = cmd.ExecuteReader(True)
            If Values.Count > 0 Then
            Dim fdr As  Row = dt.Find("FEntryID=" & e.Row("FEntryID") & "")
             If fdr Is Nothing Then
           
                 If MessageBox.Show("该产品已经设定过优先次序了,是否需要把原来的优先次序去除,重新设定当前产品为订单优先 ?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.Yes Then
               
                     fdr("FPrioritized")  = False
                    e.Row("Priority") = True
                  End If
                  e.Cancel = True
                 dt.Save()
            End If
           End If
End If

 回到顶部
帅哥哟,离线,有人找我吗?
sloyy
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2177 积分:13784 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2020/6/28 0:23:00 [只看该作者]

1 不知你这段代码写在哪里?  e.Row("FEntryID")  存在吗?
2 如果存在  改为这样  Dim fdr As  dataRow = dt.Find("FEntryID=" & e.Row("FEntryID") & "")

 回到顶部
帅哥哟,离线,有人找我吗?
leoli
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:301 积分:2547 威望:0 精华:0 注册:2018/11/15 12:35:00
  发帖心情 Post By:2020/6/28 9:34:00 [只看该作者]

你好, 是写在表属性中的Click 中。

 回到顶部
帅哥,在线噢!
cd_tdh
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3023 积分:20258 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2020/6/28 10:32:00 [只看该作者]

表属性用e.datarow

 回到顶部
帅哥哟,离线,有人找我吗?
leoli
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:301 积分:2547 威望:0 精华:0 注册:2018/11/15 12:35:00
  发帖心情 Post By:2020/6/28 14:02:00 [只看该作者]

用了e.daterow 就出现如图现象了。
图片点击可在新窗口打开查看此主题相关图片如下:捕获.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4627 积分:33767 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2020/6/28 14:09:00 [只看该作者]

晕透了
Dim fdr As  dataRow = dt.Find("FEntryID='" & e.Row("FEntryID") & "")

 回到顶部