以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  跨表新增引用  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=66215)

--  作者:Liangcai
--  发布时间:2015/4/1 13:04:00
--  跨表新增引用

当“缴证信息”表新增行时,“学生信息”对应学生缴证状态自动输入“已缴”。

比如:缴证信息表  新增 韩磊 ,学生信息表缴证状态列自动输入“已缴”。


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150401130156.png
图片点击可在新窗口打开查看


 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150401130333.png
图片点击可在新窗口打开查看
请指教代码!谢谢
--  作者:Bin
--  发布时间:2015/4/1 13:40:00
--  
和这个类似 http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=65369

在缴证信息 DataColChanged事件

if e.datacol.name="学生编号" andalso e.datarow.isnull("学生编号")=false then
    dim dr as datarow = datatables("学生信息").find("学生编号=\'" & e.datarow("学生编号") & "\'")
    if dr isnot nothing then
         dr("缴证情况")="已缴"
    end if
end if

--  作者:Liangcai
--  发布时间:2015/4/1 13:49:00
--  
谢谢