以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于向图片列添加图片时,自动命名的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=50883)

--  作者:飞天
--  发布时间:2014/5/15 0:31:00
--  关于向图片列添加图片时,自动命名的问题

以下代码:

 

Dim dr As DataRow = e.DataRow
If dr.IsNull("系列") Or Dr.IsNull("货号") Then
    MessageBox.Show("系列和货号不能为空!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    e.Cancel = True
Else
    e.SubFolder = dr("系列")
    e.FileName = dr("货号") & "(序号)" & ".jpg"   \'一个货号有多张不同角度的图片,希望当我加入多张图片时,图片名称就以货号+序号的形式命名
End If


--  作者:Bin
--  发布时间:2014/5/15 8:33:00
--  
e.FileName = dr("货号") & dr("序号") & ".jpg" 
--  作者:lsy
--  发布时间:2014/5/15 8:57:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:图片列管理.table