以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]确定关联表唯一性的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=40041)
--  作者：hiliuyong
--  发布时间：2013/9/7 9:56:00
--  [求助]确定关联表唯一性的问题

    tmpString ="运单编号 = \'" & e.Form.Controls("txtYundanBianhao").text & "\'"
    dr = Tables("扫描批次.扫描记录").DataTable.Find(tmpString)
    If dr IsNot Nothing Then
        MessageBox.Show("此单号在本批次已经存在!")
        Return
    End If

 

dr = Tables("扫描批次.扫描记录").DataTable.Find(tmpString)
这句是查询DATATABEL中的是不是存在这个运单编号，而不是关联表中看到的内容，

如果实现，只判断关联表Tables("扫描批次.扫描记录")是否存在这个运单编号。
--  作者：Bin
--  发布时间：2013/9/7 9:58:00
--  
你只需要查找子表是否存在即可

datatables("扫描记录").Find(tmpString)