请教老师：
我在BeforeAttachFile中，写如下代码：
Dim dr As DataRow = e.DataRow
Dim n As Integer = e.DataRow.Lines("附件").Count
If dr.IsNull("HIS号") Or dr.IsNull("姓名") Or Dr.IsNull("检查时间") Then
MessageBox.Show("HIS号,姓名和检查时间不能为空!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
e.Cancel = True
Else
e.SubFolder = dr("HIS号") & dr("姓名") & "\" & dr("检查时间").Year
e.FileName = dr("HIS号") & dr("姓名") & dr("检查时间") & "-" & n+1 & ".jpg"
End If
出现运行错误：不支持给定路径的格式。
是什么原因？
[此贴子已经被作者于2020/3/20 0:00:57编辑过]
加好友 
发短信
Post By：2020/3/19 23:49:00 [只看该作者]
