以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  扩展型类型-图片,表间取值不过了  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=117240)

--  作者:yetle
--  发布时间:2018/4/9 14:40:00
--  扩展型类型-图片,表间取值不过了
datacolchanged:
If e.DataCol.Name = "订单编号" Then \'如果内容发生变动的是品名列
    If e.NewValue IsNot Nothing Then \'如果新值是空白,也就是品名列的内容为空
\'          e.DataRow("系列") = Nothing \'那么清空此行单价列的内容
\'          e.DataRow("款号") = Nothing 
\'      Else
        Dim dr As DataRow
        \'否则在产品表查找同名的产品行,将找到的行赋值给变量dr
        dr = DataTables("报价申请").Find("[订单编号] = \'" & e.NewValue & "\'")
        If dr IsNot Nothing Then \'如果找到了同名的产品行,也就是dr不是Nothing
            e.DataRow("系列") = dr("业务部_系列") 
            e.DataRow("款号") = dr("业务部_款号") 
            e.DataRow("客户名称") = dr("业务部_客户")
            e.DataRow("款图") = dr("研发部_款图")   款图列是扩展型类型-图片
            e.DataRow("研发部报价审核状态") = dr("研发部_报价审核状态") 
        End If
唯独扩展型类型图片取值不过去

--  作者:有点甜
--  发布时间:2018/4/9 16:12:00
--  

1、这个列的值,是字符,肯定是取值过去了;

 

2、是不是图片没有显示导致你觉得值没有弄过去?列属性那里,设置的存放路径等设置,要和列【研发部_款图】一模一样,才行。


--  作者:yetle
--  发布时间:2018/4/9 16:44:00
--  
列的值没有取过来,报价审核状态的值也没取过来
[此贴子已经被作者于2018/4/9 16:53:50编辑过]

--  作者:有点甜
--  发布时间:2018/4/9 18:24:00
--  

试试改成

 

       If dr IsNot Nothing Then \'如果找到了同名的产品行,也就是dr不是Nothing

SystemReady = False

            e.DataRow("系列") = dr("业务部_系列") 
            e.DataRow("款号") = dr("业务部_款号") 
            e.DataRow("客户名称") = dr("业务部_客户")
            e.DataRow("款图") = dr("研发部_款图")   款图列是扩展型类型-图片
            e.DataRow("研发部报价审核状态") = dr("研发部_报价审核状态") 
SystemReady = true
        End If
 
如果上面代码还是不行,说明你find到的行,就是没有值的