目标是从EXCEL指定范围，遍寻照片，将其保存到
存储目录\“零件号”，同时将路径存储到数据“照片列”
代码如下：
Dim file As String = "D：\cprshare\工艺卡库\" & e.Form.Controls("TextBox11").text
If FileSys.FileExists(file) Then
Dim Book As New XLS.Book(file)
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim dr As Row = Tables("数据库").Current
For i As Integer = 0 To 30
For j As Integer = 0 To 25
Dim fp As String ="D:\" & dr("零件号")
If Sheet(i,j).SaveImage(fp & "\" &i & j & ".jpg" ) Then
For Each fn As String In FileSys.GetFiles(fp)
dr("照片") = FileSys.GetName(fn)
Next
End If
Next
Next
End If
报错如下：A generic error occurred in GDI+.
我测试把fp 后面的 & dr("零件号") 去掉，可以在指定文件夹成功保存所有照片，
但是“照片”列只保存成功了第二张照片，请问是什么原因？
加好友 
发短信
Post By：2018/12/29 14:12:00 [显示全部帖子]
