Foxtable(狐表)用户栏目专家坐堂 → find的多条件判断代码为何写?


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

主题:find的多条件判断代码为何写?

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


加好友 发短信
等级:小狐 帖子:357 积分:2895 威望:0 精华:0 注册:2008/9/1 14:05:00
find的多条件判断代码为何写?  发帖心情 Post By:2011/3/18 12:42:00 [只看该作者]

销售订单表中有"客户姓名,客户电话,客户地址"三列,在DataColChanging事件中禁止"客户姓名,客户电话,客户地址"三列值同时相同,如在以下的代码中如何加入对"客户姓名,客户电话,客户地址"的同时判断?

Select Case e.DataCol.Name
    Case "客户姓名"

            Dim cmd As New SQLCommand
            Dim dt As DataTable
            Dim db As DataRow
            cmd.C 
            cmd.CommandText = "SELECT  客户姓名 From {销售订单}"
            dt = cmd.ExecuteReader()
            db = dt.Find("客户姓名 = '" & trim(e.NewValue) & "'")
            If db IsNot Nothing '一定要判断是否存在对应的行
                e.Cancel =True
                Messagebox.Show("客户姓名重复,请重新录入!","提示",MessageBoxButtons.OK, MessageBoxIcon.Information)
            End If


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


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/3/18 13:38:00 [只看该作者]

db = dt.Find("客户姓名 = '" & trim(e.NewValue) & "' And 客户电话 = '" & e.DataRow("客户电话") & "' And 客户地址 = '" & e.DataRow("客户地址") & “‘”

 回到顶部