| Autor |
Beitrag |
Dude566
      
Beiträge: 1592
Erhaltene Danke: 79
W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
|
Verfasst: 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.
Delphi-Quelltext 1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19:
| procedure TForm1.Button1Click(Sender: TObject); begin with idFTP1 do begin Username := Edit1.Text; Password := Edit2.Text; Host := Edit3.Text; Connect; end; end;
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
      
Beiträge: 918
Erhaltene Danke: 158
Win 10
VS 2013, VS2015
|
Verfasst: Mi 25.02.09 19:35
Hier mal ein Ausschnitt aus einem meiner früheren Projekte: Delphi-Quelltext 1: 2: 3: 4:
| FFtp.SendCmd('TYPE I'); FFtp.Put(SourceFile, FileName); TriggerLogEvent ('Upload successful', etStatus); ChangeDir ('.'); |
Vielleicht hilfts ja 
|
|
Dude566 
      
Beiträge: 1592
Erhaltene Danke: 79
W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
|
Verfasst: 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
      
Beiträge: 2077
Erhaltene Danke: 2
Win XP
Delphi 5 Ent., Delphi 2007 Prof
|
Verfasst: 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 
      
Beiträge: 1592
Erhaltene Danke: 79
W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
|
Verfasst: 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 
      
Beiträge: 1592
Erhaltene Danke: 79
W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
|
Verfasst: 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 
      
Beiträge: 1592
Erhaltene Danke: 79
W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
|
Verfasst: 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
      

Beiträge: 10184
Erhaltene Danke: 1259
W11x64
TP3 .. D7pro .. D10.2CE
|
Verfasst: Mo 09.03.09 19:27
Moin!
Was sind denn das für "Drohungen"...  Du bist auch nicht gerade "auskunftsfreudig", was die Fehlersituation angeht.
Dude566 hat folgendes geschrieben : | | 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 
      
Beiträge: 1592
Erhaltene Danke: 79
W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
|
Verfasst: 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?
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! 
_________________ Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
|
|
jaenicke
      
Beiträge: 19341
Erhaltene Danke: 1752
W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
|
Verfasst: 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 
      
Beiträge: 1592
Erhaltene Danke: 79
W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
|
Verfasst: 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
      

Beiträge: 10184
Erhaltene Danke: 1259
W11x64
TP3 .. D7pro .. D10.2CE
|
Verfasst: 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 
      
Beiträge: 1592
Erhaltene Danke: 79
W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
|
Verfasst: 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
      
Beiträge: 19341
Erhaltene Danke: 1752
W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
|
Verfasst: Mo 09.03.09 20:07
Bei mir funktioniert der Code einwandfrei.
Lass dir doch einmal das Verzeichnis auflisten um zu schauen wo du bist: Delphi-Quelltext 1:
| IdFtp1.List(ListBox1.Items); |
|
|
Narses
      

Beiträge: 10184
Erhaltene Danke: 1259
W11x64
TP3 .. D7pro .. D10.2CE
|
Verfasst: Mo 09.03.09 20:08
Moin!
Was steht denn nach einem Upload-Versuch im Log des Servers?
cu
Narses
_________________ There are 10 types of people - those who understand binary and those who don´t.
|
|
Dude566 
      
Beiträge: 1592
Erhaltene Danke: 79
W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
|
Verfasst: Mo 09.03.09 22:33
jaenicke hat folgendes geschrieben : | Bei mir funktioniert der Code einwandfrei.
Lass dir doch einmal das Verzeichnis auflisten um zu schauen wo du bist: Delphi-Quelltext 1:
| IdFtp1.List(ListBox1.Items); | |
Ok das werde ich mal machen.
@ Narses
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.
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
      
Beiträge: 2077
Erhaltene Danke: 2
Win XP
Delphi 5 Ent., Delphi 2007 Prof
|
Verfasst: 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
      
Beiträge: 19341
Erhaltene Danke: 1752
W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
|
Verfasst: Mo 09.03.09 23:03
Was gibt denn RetrieveCurrentDir zurück?
|
|
Dude566 
      
Beiträge: 1592
Erhaltene Danke: 79
W8, W7 (Chrome, FF, IE)
Delphi XE2 Pro, Eclipse Juno, VS2012
|
Verfasst: Mo 09.03.09 23:15
Hier ein Screenshot, ich dachte aber eigentlich, dass die Datei dann in den www käme.
Moderiert von Narses: Bild als Anhang hochgeladen
Einloggen, um Attachments anzusehen!
_________________ Es gibt 10 Gruppen von Menschen: diejenigen, die das Binärsystem verstehen, und die anderen.
|
|
jaenicke
      
Beiträge: 19341
Erhaltene Danke: 1752
W11 x64 (Chrome, Edge)
Delphi 12 Pro, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
|
Verfasst: Mo 09.03.09 23:22
Also bei mir ist der Screenshot nicht erreichbar.
Warum legst du den nicht zumindest zusätzlich in den Anhang? 
|
|