+1 vote

I was trying this

   Public Sub limilabs_check()
        Dim ftp As New Ftp

        ftp.Connect("ftp.****.com", 22)

        ftp.Login("****", "****")
        ftp.Upload("Sanjay\Test.txt", "C:\Temp\test.txt")
        ftp.Close()
    End Sub

and getting below error

Additional information: Tried to read a line. No data received. Please make sure that antivirus and firewall software are disabled or configured correctly.

by
edited by

1 Answer

0 votes

You are using incorrect port. Port 22 is not FTP port. FTP uses port 21.

Use port 21 or don't specify port at all, as 21 this is a default value for connect method.

Public Sub limilabs_check()
    Dim ftp As New Ftp

    ftp.Connect("ftp.****.com")

    ftp.Login("****", "****")
    ftp.Upload("Sanjay\Test.txt", "C:\Temp\test.txt")
    ftp.Close()
End Sub
by (297k points)
...