以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]图片管理 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=60717) |
||||
-- 作者:风声 -- 发布时间:2014/11/29 19:14:00 -- [求助]图片管理 Dim dr As DataRow = e.DataRow
老师,上面代码对一个表所有图片列触发了事件,表有多列图片列每一列都有对应的名称列当名称列输入名称后图片列就自动写入名称。学习老师 |
||||
-- 作者:有点甜 -- 发布时间:2014/11/29 21:55:00 -- Select Case e.DataCol.Name Case “名称一”,“名称二”,“名称3” if e.NewValue Is nothing Then e.DataRow(e.Datacol.Name &"图片") = nothing else e.DataRow(e.Datacol.Name &"图片") = e.NewValue & ".jpg" end if end select
|
||||
-- 作者:风声 -- 发布时间:2014/11/30 10:01:00 --
老师,根据图片名称自动给图片自动取名。 |
||||
-- 作者:有点甜 -- 发布时间:2014/11/30 10:37:00 -- BeforeAttachFile 事件代码
Dim dr As DataRow = e.DataRow |
||||
-- 作者:风声 -- 发布时间:2014/11/30 14:54:00 -- 谢谢老师 |