per delphi ftpprogramm homepage aktualisieren

[ellelle]

Hallo,

ich habe eine Hompage gestaltet, die alle paar Wochen aktualisiert werden muss.
Es gibt dort eine Rubrik Seminare, in der neue Termine eingetragen werden müssen.

Ich würde gerne ein Delphiprogramm schreiben, mit dem sich das einfach lösen lassen kann.
Sprich:

Die gute Frau(sie ist die Benutzerin/sehr schlechte computerkentnisse)
soll mein programm starten und in einem stringgrid die neuen daten eintragen.
danach soll sie auf einen button klicken und ihre seite im internet wird aktualisiert.

leider weiß ich nicht, wie ich mich per delphi zu einem ftpserver verbinden kann.
kann mir mal einer einen tipp geben.
danke

mfg

[mr47]

Mit der Indykomponente TidFtp. Damit kann man relativ einfach eine FTP-verbindung herstellen und dateien hochladen. (Ich glaub bei den Indys ist ne Demo dabei oder?) ansonsten www.delphi-source.de unter Tutorials->Indy

[arbu man]

Geh mal auf die Indy homepage und load dir die demos runter eine der demos ist ein FTP Programm das daeien auf einen ftp Server laden kann usw. .

[ellelle]

hallo.

ich hab versucht eine verbindung zu einem server auszubauen.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var user:string;
begin
  User :=edit1.Text;
  IdFTP1.Password :=Edit2.Text;
  IdFTP1.Host := Edit3.Text;
  IdFTP1.Connect;
end;

dabei ist edit1 = www.ponzle.de
edit2 = XXXXXX
und edit3 = www.ponzle.de


es kommt folgenden Fehlermeldung :

Project Project1.exe raised exception class EIdProtocolReplyError with message '530 Login incorrect'. Process stopped usw.

so und die Logindaten sind nicht falsch. Genauso kann ich mich mit einem Ftpprogramm einloggen.
Wo ist der Fehler?

danke
mfg michael

[Martin W]

Zitat:

Zitat von ellelle

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var user:string;
begin
  User :=edit1.Text;
  IdFTP1.Password :=Edit2.Text;
  IdFTP1.Host := Edit3.Text;
  IdFTP1.Connect;
end;

Was bringt dir die Variable "user"...? Es muss heißen

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  IdFTP1.username := edit1.Text;
  IdFTP1.Password := Edit2.Text;
  IdFTP1.Host := Edit3.Text;
  if not IdFTP1.Connected then
  IdFTP1.Connect;
end;

[ellelle]

danke
aber es muss so heißen ;)

Delphi-Quellcode:

  IdFTP1.User := edit1.Text;
  IdFTP1.Password := Edit2.Text;
  IdFTP1.Host := Edit3.Text;
  if not IdFTP1.Connected then
  IdFTP1.Connect;
  IdFTP1.List(ListBox1.Items);

habe mir das url=http://www.dsdt.info/tutorials/indy/?page=4]Indytutorial[/url] durchgelesen und da stand

Delphi-Quellcode:

  User := IdFTP1.UserIDEdit.Text;
  IdFTP1.Password := PasswordEdit.Text;
  IdFTP1.Host := FtpServerEdit.Text;
  IdFTP1.Connect;

war ein denkfehler von mir.