以下代码，只能下载jpg图片，txt/pdf下载不了，请求帮助！
Dim ftp1 As new ftpclient
ftp1.host = _ftp_Host
ftp1.Account = _ftp_Account
ftp1.password = _ftp_Password
Dim num2 As Integer = 1
Dim lst As New List(of String)
lst = dr.Lines("維修報告")
For Each nm As String In lst
output.show(nm)
Dim num1 As Integer = nm.LastIndexOf(".")
Dim idx As String = nm.SubString(num1)
If ftp1.Download(nm, ProjectPath & "Attachments\ftpfile\"& num2 &""& idx &"") = True Then '下載文件,并重命名
num2 += 1
End If
Next
加好友 
发短信
Post By：2020/1/8 16:16:00 [只看该作者]
