假定表中有六列,分别是县区、单位名称、生成日期、姓名、登记表(照片列)、备案表(照片列),希望向登记表列添加文件的时候,自动根据县区和单位名称创建子目录来存放文件,如果点击登记表列,就将取名为"单位名称_姓名_生成日期.jpg"的文件存放到Attachments的子目录下的:登记表\县区\单位名称中;如果点击备案表列,就将取名为"单位名称_生成日期.jpg"的文件存放到Attachments的子目录下的:备案表\县区\单位名称中。如何修改,谢谢,下边的代码只能存放备案表列的。
Dim dr As DataRow = e.DataRow
If dr.IsNull("县区") Or Dr.IsNull("单位名称") Or dr.IsNull("生成日期") Or dr.IsNull("姓名") Then
MessageBox.Show("不能为空!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
e.Cancel = True
Else
e.SubFolder = "备案表" & "\" & dr("县区") & "\" & dr("单位名称")
e.FileName = dr("单位名称") & "_" & dr("生成日期") & ".jpg"
End If