使用My.Computer.Network.UploadFile将文件上传到FTP服务器时出现错误421

Question

我尝试使用cftppro连接FTP，出现以下错误：

  

    

421-抱歉，此服务器不接受明文会话和弱密码。

         

421请使用TLS安全机制重新连接。

  

所以我无法连接到FTP并使用vb.net上载它。如何修复我的vb.net程序？

    Dim sourceFileName As String = randT & ".png"
    Dim address2 As String = "ftp://XXX/public_html/PIC/" & randT & ".png"
    Dim userName As String = "name"
    Dim password As String = "pw"
    Dim showUI As Boolean = True
    Dim connectionTimeout As Integer = 500
    My.Computer.Network.UploadFile(sourceFileName, address2, userName, password, showUI, connectionTimeout)