Android Question FTP Unable to List operation

ftp_server_confirmed = False
    Dim sock As Socket
    sock.Initialize("sock")
    sock.Connect(host,port, 5000)
    Wait For sock_Connected (Successful As Boolean)
    sock.Close
    If Successful Then
        ftp.Initialize("ftp",host,port,username,password)
        Log($"FTP initialized with host=${host}, port=${port}, username=${username}, password=${password}"$)
        ftp.PassiveMode = True
        ftp.UseSSL = False
        ftp.UseSSLExplicit = False
        
        Dim obj As Object = ftp.SendCommand("PWD","")
        Wait For (obj) ftp_CommandCompleted (Command As String, Success As Boolean, ReplyCode As Int, ReplyString As String)
        Log($"Command = ${Command}, Success = ${Success}, ReplyCode = ${ReplyCode}, ReplyString = ${ReplyString}"$)
        ftp_server_confirmed = Success
        If Success Then
            mHost = host
            mPort = port
            mUserName = username
            mPassword = password
        End If
        Disconnect
        Return Successful
    Else
        Log($"Unable to initialize FTP with host=${host}, port=${port}"$)
    End If
    Return False

Tue Feb 27 08:48:15 2024 [pid 154188] CONNECT: Client "202.137.6.19"
Tue Feb 27 08:48:15 2024 [pid 154188] FTP response: Client "202.137.6.19", "220 (vsFTPd 3.0.5)"
Tue Feb 27 08:48:15 2024 [pid 154190] CONNECT: Client "202.137.6.19"
Tue Feb 27 08:48:15 2024 [pid 154190] FTP response: Client "202.137.6.19", "220 (vsFTPd 3.0.5)"
Tue Feb 27 08:48:15 2024 [pid 154190] FTP command: Client "202.137.6.19", "USER fromthesea"
Tue Feb 27 08:48:15 2024 [pid 154190] [fromthesea] FTP response: Client "202.137.6.19", "331 Please specify the password."
Tue Feb 27 08:48:15 2024 [pid 154190] [fromthesea] FTP command: Client "202.137.6.19", "PASS <password>"
Tue Feb 27 08:48:16 2024 [pid 154189] [fromthesea] OK LOGIN: Client "202.137.6.19"
Tue Feb 27 08:48:16 2024 [pid 154191] [fromthesea] FTP response: Client "202.137.6.19", "230 Login successful."
Tue Feb 27 08:48:16 2024 [pid 154191] [fromthesea] FTP command: Client "202.137.6.19", "PWD"
Tue Feb 27 08:48:16 2024 [pid 154191] [fromthesea] FTP response: Client "202.137.6.19", "257 "/" is the current directory"

Public Sub Check_Files_On_FTPServer(path As String) As ResumableSub
    Dim result As JsonArray
    result.InitializeEmpty
    
    If ftp_server_confirmed Then
        ftp.Initialize("ftp",mHost,mPort,mUserName,mPassword)
        If ftp.IsInitialized Then
            Log("about to Check_Files_On_FTPServer on path "&path)
        
            Wait For (ftp.List(path)) ftp_ListCompleted (ServerPath As String, Success As Boolean, Folders() As FTPEntry, Files() As FTPEntry)
            Log("Check_Files_On_FTPServer path = "&ServerPath&", result = "&Success&", File length = "&Files.Length&", Folder length = "&Folders.Length)
            If Success Then
                lastresult.InitializeEmpty
                If (Folders<>Null And Folders.Length>0) Then
                    For Each fe As FTPEntry In Folders
                        Dim xx As JsonObject = mycode.JsonObject_FtpEntry("d",fe.Name,fe.Size,fe.Timestamp)
                        result.PutJsonObject(xx)
                    Next
                End If
                If (Files<> Null And Files.Length>0) Then
                    For Each fe As FTPEntry In Files
                        Dim yy As JsonObject = mycode.JsonObject_FtpEntry("-", fe.Name,fe.Size, fe.Timestamp)
                        result.PutJsonObject(yy)
                        lastresult.PutJsonObject(yy)
                    Next
                End If
            End If
        End If
        
        ftp.Close
    End If
    
    Return result
End Sub

Tue Feb 27 08:48:30 2024 [pid 154193] CONNECT: Client "202.137.6.19"
Tue Feb 27 08:48:30 2024 [pid 154193] FTP response: Client "202.137.6.19", "220 (vsFTPd 3.0.5)"
Tue Feb 27 08:48:30 2024 [pid 154193] FTP command: Client "202.137.6.19", "USER fromthesea"
Tue Feb 27 08:48:30 2024 [pid 154193] [fromthesea] FTP response: Client "202.137.6.19", "331 Please specify the password."
Tue Feb 27 08:48:30 2024 [pid 154193] [fromthesea] FTP command: Client "202.137.6.19", "PASS <password>"
Tue Feb 27 08:48:30 2024 [pid 154192] [fromthesea] OK LOGIN: Client "202.137.6.19"
Tue Feb 27 08:48:30 2024 [pid 154194] [fromthesea] FTP response: Client "202.137.6.19", "230 Login successful."
Tue Feb 27 08:48:30 2024 [pid 154194] [fromthesea] FTP command: Client "202.137.6.19", "SYST"
Tue Feb 27 08:48:30 2024 [pid 154194] [fromthesea] FTP response: Client "202.137.6.19", "215 UNIX Type: L8"
Tue Feb 27 08:48:30 2024 [pid 154194] [fromthesea] FTP command: Client "202.137.6.19", "PORT 172,18,11,218,143,41"
Tue Feb 27 08:48:30 2024 [pid 154194] [fromthesea] FTP response: Client "202.137.6.19", "500 Illegal PORT command."