Autor Beitrag
Dude566
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1592
Erhaltene Danke: 79

W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
BeitragVerfasst: Di 24.02.09 22:59 
In diesem Thread hier war das erste Problem der Login.

Dieser funktioniert jetzt, jedoch wird die Datei nicht hochgeladen.

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
// Connect
procedure TForm1.Button1Click(Sender: TObject);
begin
  with idFTP1 do
    begin
    Username := Edit1.Text;
    Password := Edit2.Text;
    Host := Edit3.Text;
    Connect;
    end;
end;

// Upload
procedure TForm1.Button6Click(Sender: TObject);
begin
  OpenDialog1.Execute;
  IdFTP1.Put(OpenDialog1.FileName,
  ExtractFileName(OpenDialog1.FileName));
end;


Gruß Dude566

_________________
Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
jfheins
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 918
Erhaltene Danke: 158

Win 10
VS 2013, VS2015
BeitragVerfasst: Mi 25.02.09 19:35 
Hier mal ein Ausschnitt aus einem meiner früheren Projekte:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
FFtp.SendCmd('TYPE I');
      FFtp.Put(SourceFile, FileName);
      TriggerLogEvent ('Upload successful', etStatus);
      ChangeDir ('.');

Vielleicht hilfts ja ;)
Dude566 Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1592
Erhaltene Danke: 79

W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
BeitragVerfasst: Do 26.02.09 22:03 
Wofür steht das "Type 1" und was macht das TriggerLogEvent?

In den Variablen Sourcefile und Filename hast du einfach den Pfad stehen oder?

Was hast du denn dann in Filename stehen? Nur den Dateinamen oder einen ganzen Pfad für den FTP, könnte da bei mir vielleicht der Fehler liegen, dass ich kein Pfad habe?

_________________
Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
Xentar
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2077
Erhaltene Danke: 2

Win XP
Delphi 5 Ent., Delphi 2007 Prof
BeitragVerfasst: Fr 27.02.09 00:49 
Google -> "FTP Type I" ...
Ich denk mal, dass TriggerLogEvent eine interne Funktion bei ihm ist, die einfach nur mitloggt, was gemacht wird.

Und in Filename sollte, zumindest lokal, der komplette Pfad drinstehen (stichwort absoluter Pfad). Auf FTP Seite bin ich mir grad nicht sicher, aber ich mein, hier würde der Dateiname reichen.

_________________
PROGRAMMER: A device for converting coffee into software.
Dude566 Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1592
Erhaltene Danke: 79

W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
BeitragVerfasst: Fr 27.02.09 14:09 
In Sourcefile habe ich auch den absoluten Pfad, und in Filename den Dateinamen,
trotzdem funktioniert es nicht.

_________________
Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
Dude566 Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1592
Erhaltene Danke: 79

W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
BeitragVerfasst: Di 03.03.09 18:24 
Keine Ideen mehr?

_________________
Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
Dude566 Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1592
Erhaltene Danke: 79

W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
BeitragVerfasst: Mo 09.03.09 19:12 
Keiner??? Dann muss ich irgendwo anders Hilfe suchen.

_________________
Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
Narses
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Administrator
Beiträge: 10184
Erhaltene Danke: 1259

W11x64
TP3 .. D7pro .. D10.2CE
BeitragVerfasst: Mo 09.03.09 19:27 
Moin!

Was sind denn das für "Drohungen"... :| Du bist auch nicht gerade "auskunftsfreudig", was die Fehlersituation angeht. :nixweiss:

user profile iconDude566 hat folgendes geschrieben Zum zitierten Posting springen:
Dieser funktioniert jetzt, jedoch wird die Datei nicht hochgeladen.
Was heißt das denn genau? Gibt es eine Fehlermeldung? Wenn ja, welche? Hast du geprüft, ob du Schreibrechte im Zielverzeichnis des FTP hast? Hast du es mal mit einem anderen FTP-Server probiert? Evtl. mal lokal? Dateiname frei von Sonderzeichen? FTP-Upload mit einem Standalone-FTP-Client probiert?

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.
Dude566 Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1592
Erhaltene Danke: 79

W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
BeitragVerfasst: Mo 09.03.09 19:33 
Keine Fehlermeldung, die Schreibrechte sind auch richtig gesetzt.

Der Dateiname enthält auch keine Sonderzeichen, aber ich bin mir wie gesagt nicht sicher ob man denn einfach so in das Rootverzeichnis Uploaden kann ohne den Pfad anzugeben.

Immerhin habe ich das ja dann nur Opendialog1.Filename angegeben, ist das zu wenig?

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
procedure TForm1.Button6Click(Sender: TObject);
begin
  OpenDialog1.Execute;
  IdFTP1.Put(OpenDialog1.FileName,
  ExtractFileName(OpenDialog1.FileName));
end;


PS: Sollte keine Drohung sein, endlich antwortet einer! :dance2:

_________________
Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19341
Erhaltene Danke: 1752

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Mo 09.03.09 19:35 
Solange du kein ChangeDir machst, sollte das Verzeichnis das Rootverzeichnis deines Bereichs sein, in das du laden kannst. Oder setzt du irgendwo ein anderes Verzeichnis? In dem Fall müsstest du berücksichtigen, dass / nicht dein Root ist sondern das des gesamten Dateisystems. D.h. du musst dir dein eigenes Startverzeichnis einfach vorher merken.
Dude566 Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1592
Erhaltene Danke: 79

W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
BeitragVerfasst: Mo 09.03.09 19:37 
Nein, ich verbinde und wechsle nicht mit ChangeDir, also noch nicht.

Dann müsste er es doch ins Rootverzeichnis packen, macht er aber nicht.

_________________
Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
Narses
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Administrator
Beiträge: 10184
Erhaltene Danke: 1259

W11x64
TP3 .. D7pro .. D10.2CE
BeitragVerfasst: Mo 09.03.09 19:40 
Moin!

Kannst du denn die Datei mit einem FTP-Client hochladen (notfalls ftp.exe von Windows)?

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.
Dude566 Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1592
Erhaltene Danke: 79

W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
BeitragVerfasst: Mo 09.03.09 19:54 
Ja, das hatte ich aber auch in dem alten Thread schon geschrieben. ;)

_________________
Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19341
Erhaltene Danke: 1752

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Mo 09.03.09 20:07 
Bei mir funktioniert der Code einwandfrei. :nixweiss:

Lass dir doch einmal das Verzeichnis auflisten um zu schauen wo du bist:
ausblenden Delphi-Quelltext
1:
IdFtp1.List(ListBox1.Items);					
Narses
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Administrator
Beiträge: 10184
Erhaltene Danke: 1259

W11x64
TP3 .. D7pro .. D10.2CE
BeitragVerfasst: Mo 09.03.09 20:08 
Moin!

Was steht denn nach einem Upload-Versuch im Log des Servers? :gruebel:

cu
Narses

_________________
There are 10 types of people - those who understand binary and those who don´t.
Dude566 Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1592
Erhaltene Danke: 79

W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
BeitragVerfasst: Mo 09.03.09 22:33 
user profile iconjaenicke hat folgendes geschrieben Zum zitierten Posting springen:
Bei mir funktioniert der Code einwandfrei. :nixweiss:

Lass dir doch einmal das Verzeichnis auflisten um zu schauen wo du bist:
ausblenden Delphi-Quelltext
1:
IdFtp1.List(ListBox1.Items);					


Ok das werde ich mal machen.

@ user profile iconNarses
Wie mache ich das, habe damit nicht wirklich viel Erfahrung?

Edit: Jetzt werde ich doch verrückt!
Wenn ich mir den Inhalt in der ListBox anschaue zeigt er mir die anderen Dateien nicht, aber die testdatei.txt scheint doch da zu sein.

Im Online Filemanager von Kilu wird sie aber nicht angezeigt, schaue nochmal bei FileZilla. :roll:

Die Datei ist in www-data. Aber dann müsste ich sie doch sehn. :?: :?!?:

_________________
Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
Xentar
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2077
Erhaltene Danke: 2

Win XP
Delphi 5 Ent., Delphi 2007 Prof
BeitragVerfasst: Mo 09.03.09 22:59 
...
sicher, dass du dich mit dem gleichen Benutzer anmeldest, und im gleichen Verzeichnis bist?

_________________
PROGRAMMER: A device for converting coffee into software.
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19341
Erhaltene Danke: 1752

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Mo 09.03.09 23:03 
Was gibt denn RetrieveCurrentDir zurück?
Dude566 Threadstarter
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1592
Erhaltene Danke: 79

W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
BeitragVerfasst: Mo 09.03.09 23:15 
Hier ein Screenshot, ich dachte aber eigentlich, dass die Datei dann in den www käme.
Moderiert von user profile iconNarses: Bild als Anhang hochgeladen
Einloggen, um Attachments anzusehen!
_________________
Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
jaenicke
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 19341
Erhaltene Danke: 1752

W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
BeitragVerfasst: Mo 09.03.09 23:22 
Also bei mir ist der Screenshot nicht erreichbar. :nixweiss:

Warum legst du den nicht zumindest zusätzlich in den Anhang? ;-)