Skip to main content
Skip table of contents

FTPRename()

FTPRename() – FTP Datei umbenennen

Die Funktion ermöglicht das Umbenennen von Dateien auf einem FTP-Server.

ParameterBeschreibung
aCaption:C Titel
aRemoteHost:C IP oder Domain des Hosts
aRemotePort:N Port des Hosts
aUserName:C User-Name
aPassword:C Passwort
aPassiveMode:L Passiver Übertragungsmodus
aFileList:U Array mit altem und neuem Dateinamen
aHostPath:C RemotePath; default = Leerstring
aLogFileName:C Logfile schreiben; default = Leerstring
aIncludeHostDir:L Directorylist in TraceFile; default = false
lShowMsg:L Exceptions statt Messages; default = false
aQuietMode:LKein Dialog anzeigen. Wenn in beas benutzt wird, ist aQuietMode IMMER true

Rückgabewert

Numerisch

  • 0 für korrekte Ausführung, ansonsten Fehler-Code
  • 1 für Verbindungsfehler
  • 2 für Fehler beim Verzeichniswechsel
  • 3 u.a Datei nicht gefunden
  • 5 für Vorgang abgebrochen
    Achtung: FTP-Fehler können auch eine Exception auslösen!

Beispiel

CODE
| aResult, i, j, aHostFiles, aHostPath, aSourcePath,
  aDestPath, aDestFile, aFileExt, aLogFile, aGetFiles, aLogTxt |

function ErrChk(aErrNo)
   if aErrNo <> 0 then
      ShowMessage('Error ' + Str(aErrNo)),
      Abort(),
   endif,
end,

aLogFile    := 'C:\SICHERUNG\FTP_Test\MyFtpLog.txt',
aDestPath   := 'C:\SICHERUNG\FTP_Test\Download\',
aSourcePath := 'C:\SICHERUNG\FTP_Test\Upload\',
aHostPath   := 'Test',

if File(aLogFile) then
   DeleteFile(aLogFile),
endif,
startseq,

  FTPUpload('Datei übertragen',                        // Überschrift
            '192.168.10.152',                          // RemoteHost
            21,                                        // RemotePort
            'beuser',                                  // UserName
            'be32',                                    // Password
            .t.,                                       // PassivMode
            {'C:\SICHERUNG\FTP_Test\DataUpload.pdf'},  // aFileArray
            aHostPath,                                 // HostPath
            aLogFile),                                 // LogFileName

   WriteLn('Beispiel: Datei auf dem FTPServer umbenennen ...'),
   ErrChk(aResult := FTPRename('Datei umbenennen',                       // Überschrift
                               '192.168.10.152',                         // RemoteHost
                               21,                                       // RemotePort
                               'beuser',                                 // UserName
                               'be32',                                   // Password
                               true,                                     // PassivMode
                               {'DataUpload.pdf', 'DataUpload-New.pdf'}, // aFileArray
                               aHostPath,                                // HostPath
                               aLogFile)),                               // LogFileName


onerror,
   aResult := -1,
stopseq,

aResult
JavaScript errors detected

Please note, these errors can depend on your browser setup.

If this problem persists, please contact our support.