[求助]在增加图片列：扫描件列时，批量增加图片时，不能进行批量编号，请指教下列代码，如何修改，才能在“扫描件”列的单元格中批量增加图片时，自动编号，现在是批量增加图片时，只生成1号，然后说重命名或覆盖，谢谢
代码：
Dim dr As DataRow = e.DataRow
If dr.IsNull("年度") Or Dr.IsNull("工伤认定文号") Or dr.IsNull("受伤害职工姓名") Then
MessageBox.Show("不能为空!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
e.Cancel = True
Else
If e.DataCol.Name = "扫描件" Then
e.SubFolder = e.DataCol.name & "\" & dr("年度") & "\" & dr("受伤害职工姓名")
e.FileName = dr("工伤认定文号") & "_" & dr("受伤害职工姓名") & "_" & (e.DataRow.Lines("扫描件").Count + 1) & ".jpg"
End If
End If
出现的问题是：如图：
此主题相关图片如下：截图00.jpg
加好友 
发短信
Post By：2017/10/12 8:03:00 [只看该作者]
