老师好！
我做的代码，保存后，多出了我不想要的前缀:bmp\
我想要的是：XS1812190451_2收款_.bmp
可是，却是这样的：bmp\XS1812190451_2收款_.bmp
我百思不得其解。
请老师帮忙分析一下，下面的代码，错误在哪儿？
麻烦老师了！
谢谢！
''判断图片文件后缀,然后保存相同的后缀
Dim dr As DataRow = e.DataRow
If dr.IsNull("FBILLNO") Then
MessageBox.Show("请先输入销售出库单号!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
e.Cancel = True
Else
Dim ext As String
ext = e.FileName.SubString(e.FileName.LastIndexof(".") + 1) '获得文件后缀名
Select Case ext
Case "bmp","gif","jpg","png","tif", "wmf" ''判断图片文件后缀,然后保存相同的后缀
e.SubFolder = ext
If e.DataCol.name = "F_PAEZ_TEXT25" Then '获取文件个数
Dim fls As List(of String)
fls = e.DataRow.Lines("F_PAEZ_TEXT25") '获取文件个数+1 fls.Count + 1
e.FileName = dr("FBILLNO") & "_" & fls.Count + 1 & "收款_" & "."& ext ''判断图片文件后缀,然后保存相同的后缀
End If
''判断图片文件后缀,然后保存相同的后缀
If e.DataCol.name = "F_PAEZ_TEXT251" Then '获取文件个数
Dim fls As List(of String)
fls = e.DataRow.Lines("F_PAEZ_TEXT251") '获取文件个数+1 fls.Count + 1
e.FileName = dr("FBILLNO") & "出货单_" & fls.Count + 1 & "_" & "."& ext ''判断图片文件后缀,然后保存相同的后缀
End If
End Select
End If
加好友 
发短信
Post By：2018/12/19 17:40:00 [只看该作者]
