Foxtable(狐表)用户栏目专家坐堂 → 关于sqlfind查找后赋值的问题


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

主题:关于sqlfind查找后赋值的问题

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


加好友 发短信
等级:幼狐 帖子:81 积分:870 威望:0 精华:0 注册:2018/9/27 14:01:00
关于sqlfind查找后赋值的问题  发帖心情 Post By:2020/7/16 8:06:00 [只看该作者]

各位老师好,最近发现用sqlfind查找到的行再对该行的其他列赋值的时候不起作用,用find查找到行可以正常赋值,很疑惑,请帮忙看一下哪个地方有问题?

对比代码如下:

Dim dr As DataRow
If Tables("表A").Rows(0)("序号") = 1 Then  '判断是否加载了序号为1的列
    dr = DataTables("表A").Find("[序号] = 1")
    If dr IsNot Nothing Then
        dr("第三列") = "直接赋值"
    End If
Else
    dr = DataTables("表A").SQLFind("[序号] = 1")
    If dr IsNot Nothing Then
        dr("第二列") = "后台赋值"
    End If
End If
DataTables("表A").Save

当用sqlfind查找时,把查找的行加载后,发现该行并没有“后台赋值”,请问是什么原因?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar


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


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

SQLFind出来的是一个独立的行,和原表没有什么关系,需要单独保存

Dim dr As DataRow

If Tables("表A").Rows(0)("序号") = 1 Then  '判断是否加载了序号为1的列
    dr = DataTables("表A").Find("[序号] = 1")
    If dr IsNot Nothing Then
        dr("第三列") = "直接赋值"
    End If
Else
    dr = DataTables("表A").SQLFind("[序号] = 1")
    If dr IsNot Nothing Then
        dr("第二列") = "后台赋值"
dr.save
    End If
End If
DataTables("表A").Save

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


加好友 发短信
等级:幼狐 帖子:81 积分:870 威望:0 精华:0 注册:2018/9/27 14:01:00
  发帖心情 Post By:2020/7/16 9:43:00 [只看该作者]

是的,非常感谢!

 回到顶部