- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 图片的自动显示 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=43568)
-- 发布时间：2013/12/10 14:13:00
-- 图片的自动显示
当我新增明细选择产品编号之后 图片浏览器自动显示此编号说对应的产品图片 怎么做呢？
此主题相关图片如下：qq图片20131210140837.jpg
-- 发布时间：2013/12/10 14:15:00
--
自动为图片列赋值即可,假如原本该图片是存在某产品的图片列的
e.datarow("图片")=dr("图片") 即可\' DR为该产品的图片列
实在不会可以上个例子.
-- 发布时间：2013/12/10 14:18:00
--
那是要在明细表里面也要建一个图片列了吧 如果不建立图片列的话 能不能够实现这种功能
-- 发布时间：2013/12/10 14:20:00
--
怎么样都可以,只要你确定图片来源.
我这个只是假设图片来源是在这里而已.
-- 发布时间：2013/12/10 14:25:00
--
If e.DataCol.Name = "产品编号" Then
Dim dr As DataRow
dr = DataTables("产品资料").Find("[产品编号] = \'" & e.DataRow("产品编号") & "\'")
If dr IsNot Nothing Then
e.DataRow("产品名称") = dr("中文品名")
e.DataRow("型号规格") = dr("产品规格")
e.DataRow("计量单位") = dr("计量单位")
e.DataRow("产品图片") = dr("产品图片")
Else
e.DataRow("产品名称") = Nothing
e.DataRow("型号规格") = Nothing
e.DataRow("计量单位") = Nothing
e.DataRow("产品图片") = Nothing
End If
End If
为什么没用呢？
-- 发布时间：2013/12/10 14:28:00
--
1.你取值的行本来就没有数据
2.你储存的不是默认路径,那么你这个列的列属性也要设置对应的文件路径.
-- 发布时间：2013/12/10 14:30:00
--
代码似乎没有问题，看看输入产品编号后，产品图片列是否出现了内容，如果已经出现内容，看看是否存在这个图片。
实在搞不定，就做个小例子发上来说话
-- 发布时间：2013/12/10 14:30:00
--
那么我该怎么做呢》
此主题相关图片如下：qq图片20131210142930.jpg
-- 发布时间：2013/12/10 14:31:00
--
看7楼狐爸提示.
-- 发布时间：2013/12/10 14:42:00
--
okok 调试好咯 嘿嘿