主题：如何不显示导出ftp图片的错误

 例子发上来，怎样不行？

Dim filter As String = ""
For Each r As Row In Tables("表A").Rows
    If FileSys.FileExists(ProjectPath & "Attachments\" & r("图片")) Then
        filter &= r("_Identify") & ","
    End If
Next
Dim Book As New XLS.Book(ProjectPath & "Attachments\模板.xls")
Dim fl As String = ProjectPath & "Reports\模板.xls"
book.Sheets(0)(2,8).Value = "<_Identify in (" & filter.trim(",") & ")>"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()

 ftp的不能在模板里直接引用啊，你必须另外加一列，存放下载后的图片的路径。