以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]数据引用  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=91440)

--  作者:nbsfy3378
--  发布时间:2016/10/11 0:17:00
--  [求助]数据引用
If e.DataCol.name="项目进程" Then
    Dim  dr As DataRow
    dr=DataTables("项目分类").find("项目过程= \'e.newvalue\'")
    e.DataRow("jcdm")=dr("序号")
End If


在“项目表”的DataColChanged事件,为了把“项目分类”表中该项目过程所对应的序号引用到“项目表”中。
上述代码,哪里出了问题?

--  作者:有点蓝
--  发布时间:2016/10/11 8:31:00
--  
If e.DataCol.name="项目进程" Then
    Dim  dr As DataRow
    dr=DataTables("项目分类").find("项目过程= \'" & e.newvalue & "\'")
    e.DataRow("jcdm")=dr("序号")
End If

--  作者:nbsfy3378
--  发布时间:2016/10/12 9:22:00
--  
ok了,谢谢!