主题：删除FTP对应路径的附件

datarowdeleting事件，循环每一个文件删除，如

Dim dr As DataRow = e.DataRow
Dim ls As List(of String) = dr.lines("证件缩略图")
Dim ftp1 As new  ftpclient
ftp1.host="000.00.000.0"
ftp1.Account = "******"
ftp1.password = "*******"
For Each s As String In ls
    ftp1.DeleteFile(s)
Next
ftp1.close