Foxtable(狐表)用户栏目专家坐堂 → 图片列的存放与來源目录问题-已解決


  共有5729人关注过本帖树形打印复制链接

主题:图片列的存放与來源目录问题-已解決

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/5/27 8:47:00 [显示全部帖子]

没有看明白你的问题,你研究一下以下事件,看看是否有帮助:

 

BeforeAddFile 在图片列或文件管理器中单击“增加”按钮的时候执行。
BeforeAttachFile 在向在文件型、多文件型、以及图片型列中添加文件的时候执行
BeforeOpenFile 在图片列或文件管理器中单击“打开”按钮的时候执行。
BeforeDeleteFile 在文件或图片管理器,删除文件或图片的时候执行

 


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/5/29 8:35:00 [显示全部帖子]

用这个事件:
http://www.foxtable.com/help/topics/2637.htm


 
可以很好地解决你的问题:
 
If e.DataCol.Name = "文件列名称" Then
    Dim fn1 As String = "\\192.168.0.228\img\工艺图\" & FileSys.GetName(e.Filename) '新的文件名和路径
    Dim fn2 As String = "\\192.168.0.228\img\蜡模\" & FileSys.GetName(e.Filename) '新的文件名和路径
    Dim fn3 As String = "\\192.168.0.228\img\货版\" & FileSys.GetName(e.Filename) '新的文件名和路径
    If filesys.FileExists(fn1) Then
        e.FileName = fn1
    ElseIf filesys.FileExists(fn2) Then
        e.FileName = fn2
    ElseIf filesys.FileExists(fn3) Then
        e.FileName = fn3
    End If
End If


 回到顶部