Einzelnen Beitrag anzeigen

Todesmaster123

Registriert seit: 20. Apr 2014
3 Beiträge
 
#1

FTP Datei hochladen [Überschreiben]

  Alt 2. Jan 2015, 01:56
Hey Leute,

ich habe ein Problem. Wenn ich versuche eine Datei mit meinem Programm zu uploaden ( die Datei ist schon vorhanden auf dem Server )
bekomme ich folgenden Fehler:

" Zugriffsverletzung bei Adresse 006D522E in Modul 'Teamtool1.exe'. Lesen von Adresse 00000000."

Code:
var
  Ini: TIniFile;
begin

ftp.Host := '...';
ftp.Username := '...';    
ftp.password := '...';
ftp.Connect;

if Combobox2.Text = Titel1.Caption then begin
 ftp.Get('/Team/Dokumente/Dokument1.txt','Dokument1.txt'); //download
 ftp.Get('/Team/Dokumente/Doku.ini','Doku.ini'); //download
 //Speichern
 Memo5.Lines.SaveToFile(Pfad.Text+'Dokument1.txt');

 ftp.Delete('/Team/Dokumente/Dokument1.txt');

 ftp.Put(Pfad.Text+'Dokument1.txt','/Team/Dokumente/Dokument1.txt',False);

    Ini.WriteString('Termin1', 'Erstellt', 'Ja');
    Ini.WriteString('Termin1', 'Titel', Edit8.Text);
    Ini.WriteString('Termin1', 'Ersteller', GroupBox1.Caption);
    Ini.WriteString('Termin1', 'Anhänge', '0');
    Ini.WriteString('Termin1', 'Datum', Edit12.Text);

  ftp.Delete('/Team/Dokumente/Doku.ini');
  ftp.Put(Pfad.Text+'Doku.ini','/Team/Dokumente/Doku.ini',False);

end;
Verbindung besteht, Dateien werden runtergeladen.

MFG _WarElite_
  Mit Zitat antworten Zitat