Upload einer texdatei auf einen ftpserver

SebTheRipper · Hält's aus hier Beiträge: 11

Hallo leute!

Ich habe ein Problem/siehe Topic
Zum Download einer textdatei habe ich folgende procedure verwendet:

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

procedure TForm1.Downloaden(Sender: TObject); 
var Datei,Ziel:PChar; 
begin 
try 
  Datei := 'Quelldatei als URL'; 
  Ziel := 'Zieldatei absolut oder relativ'; 
  UrlDownloadToFile(nil, Datei, Ziel, 0, nil);
except 
  showmessage('Download abgebrochen'); 
end; 
  memo1.Lines.LoadFromFile('Zieldatei absolut oder relativ'); 
end;

gibt es einen ähnlichen befehl wie UrlDownloadToFile(...) wie zb.: UrlUploadToFile(...) ?

ps: bitte incl. zusätzliche USES!

Wäre sehr gut wenn das einer wüsste!

SebTheRipper

derDoc · Beiträge: 623 Win Vista Prof D2007 Prof

Du kannst es mit einer TNMFTP-Komponente versuchen, die hat die

markieren

Quelltext

1:	procedure Upload(LocalFile, RemoteFile: string);

Damit kannst du auch Dateien hochladen. Wenn du das trotzdem ohne Komponente machen willst, schau dir doch mal den Quelltext dieser procedure an und hohl dir ein paar Anregungen.

_________________
MfG derDoc
There are only 10 types of people: those who understand binary and those who don't.

toms · Beiträge: 1099 Erhaltene Danke: 2

Zitat:

gibt es einen ähnlichen befehl wie UrlDownloadToFile(...) wie zb.: UrlUploadToFile(...) ?

InternetWriteFile

SebTheRipper · Hält's aus hier Beiträge: 11

hmm, da scheinen wiederum uses zu fehlen!! bei mir kommt der fehler undefinierter bezeichner!
wäre nett wenn du mir uses und vielleicht eine procedure wie die obrige um download für den upload nennen könntest!! bin immerhin noch ein anfänger!

SebTheRipper

derDoc · Beiträge: 623 Win Vista Prof D2007 Prof

Füg der uses-Klausel einfach WinInet hinzu.

_________________
MfG derDoc
There are only 10 types of people: those who understand binary and those who don't.

SebTheRipper · Hält's aus hier Beiträge: 11

schon wieder was, mag euch vielleicht simpel vorkommen, hab aber da noch nich so den plan!
also: den befehl kennt er jetzt soweit so gut:
was muss hinter der procedure in klammern stehen
wenns geht so: zb: internetwritefile(datei,ziel....);
was muss da in die klammern! ich öfnne mit meinem prog keine verbindung(als anmerkung)

SebTheRipper

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme