以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  通过名称提取编号  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88993)

--  作者:yangwenghd
--  发布时间:2016/8/13 2:33:00
--  通过名称提取编号
能帮忙看看这个吗?为什么用编号提取企业名称可以实现,但是把企业名称和编号换了就不能是名称提取编号了呢,
如果企业名称列  在表A的第一列和表B的第二列同时查找怎么条件啊?
意思就是 当本表 的企业档案列 收入 一个中国某某某企业后  然后 本表的二列 就等于 表A 第一列 和表B的第二列 有相同的,然后把同行的第三列收入到 本表的企业编号。感谢 感谢   
If e.DataCol.Name = "企业名称" Then
    Dim drt As DataRow
    drt = DataTables("企业档案").Find("企业_名称= \'"  & e.DataRow("企业名称") & "\'" )
    If drt IsNot Nothing \'如果找到, 则设置各列内容
        e.DataRow("企业编号")= drt("编号")
    End If
End If  \'带入企业编号

--  作者:cbt
--  发布时间:2016/8/13 7:47:00
--  

上传列子,!

 


--  作者:Hyphen
--  发布时间:2016/8/13 9:13:00
--  
贴出事件完整代码
--  作者:yangwenghd
--  发布时间:2016/8/13 9:58:00
--  
麻烦大家了
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20160813095653.jpg
图片点击可在新窗口打开查看
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:编号同步.table



--  作者:Hyphen
--  发布时间:2016/8/13 10:09:00
--  


--  作者:Hyphen
--  发布时间:2016/8/13 10:13:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:编号同步.table


--  作者:yangwenghd
--  发布时间:2016/8/13 10:28:00
--  
太感谢了,请教一下 代码中的第三列是一个什么作用啊,可以没有第三列吗?
--  作者:Hyphen
--  发布时间:2016/8/13 10:40:00
--  
通过什么区分供应商还是客户?
--  作者:yangwenghd
--  发布时间:2016/8/16 16:58:00
--  
编号前面是6的是供应商 如果是1 就是客户


--  作者:大红袍
--  发布时间:2016/8/16 17:11:00
--  
以下是引用yangwenghd在2016/8/16 16:58:00的发言:
编号前面是6的是供应商 如果是1 就是客户

 

无语,编号是获取得到的啊,没得到之前,怎么知道编号,怎么知道提取哪个表的数据啊。