主题：[求助]怎样用代码实现ftp端图片在图片管理器中显示

Dim piv As WinForm.PictureViewer = Tables("货品").Cols("照片").PictureViewer

Dim ftp As New FTPClient
ftp.host="192.168.128.143"
ftp.Account = "yinsha"
ftp.password = "128168909"
piv.FTPclient = ftp

每次添加图片都会弹出内置的FTP管理器，因为要想压缩照片，我的添加照片代码都在DataColChanged实现了。

Upload

将文件上传到FTP，语法：

Upload(sourceFileName, destinationFileName, ShowUI)

sourceFileName：要上传的本地文件，含路径
destinationFileName：目标文件，含路径
ShowUI：逻辑型，是否显示上传进度，默认为False。

如果上传成功，返回True，否则返回False

示例

Dim ftp1 As New FtpClient
ftp1.Host="196.128.143.28"
ftp1.Account = "foxuser"
ftp1.Password = "138238110"
If ftp1.Upload("c:\data\Desert.jpg","\update\Desert.jpg") = True Then
    Messagebox.show("上传完成!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Else
    Messagebox.show("上传失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If