文件型列可以指定列存放目录。对每一行的记录能设置对应的行子目录吗？每一行对应一个子目录，里面存放每一笔记录的各种文件资料，请教大侠这样可以吗？

可以，解决办法参考：

http://www.foxtable.com/help/topics/2209.htm

     BeforeAttachFile 事件

假定文件中有三列，分别是作者、拍摄日期、照片，希望向照片列添加文件的时候，自动根据作者和拍摄日期创建子目录来存放文件，例如作者张三在2010年度拍摄的照片存放在Attachments的子目录"张三\\2010"下：

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("作者") & "\\" & dr("拍摄日期").Year
End If

如果在上例基础上增加视频列，存放在固定目录，不需要动态存储，同时又把每一行的视频文件复制到照片列动态存储目录。

请教狐狸老爸这样可以吗？感谢。。

Dim dr As DataRow = e.DataRow
Dim dt As DataTable = DataTables("协议表")

Dim dc As DataCol = dt.DataCols("旧程式")

If dc.name = ("旧程式")  Then
      e.Cancel = True
Else
    e.SubFolder = dr("设备类目") & "\\" & dr("设备品牌")& "\\" & dr("设备型号")
End If

改成这样后，执行所有的列都执行了e.Cancel = True，其他列没有执行"e.SubFolder = dr("设备类目") & "\\" & dr("设备品牌")& "\\" & dr("设备型号")",

请教版主，这是什么问题，实在是没找出问题。

按照e-png 提供的帮助修改后，问题依旧一样，在任何文件型列添加文件时候都添加不了，空白。

 e.SubFolder = dr("设备类目") & "\\" & dr("设备品牌")& "\\" & dr("设备型号") 只写这一句，每列都可以按照行添加动态存储
目录。

继续再查资料。。

怎么就没一位大侠愿意指教一下呢？