Entwickler-Ecke

Internet / Netzwerk - Funktion Put -> hochladen -> PHP


Paprika - Do 19.06.03 21:16
Titel: Funktion Put -> hochladen -> PHP
Hallo Leute!

Ich möchte eine Datei auf einen WebServer hochladen. Aus Sicherheitsgründen ohne FTP-Zugriff. Ich habe gehört es soll irgendwie mit der Put-Funktion von Indy bzw. Fastnet gehen (NMHTTP1.Put ...)

Keiner konnnte mir sagen wie das so geht ... Ich glaube es liegt daran, dass die meisten in den Delphiforen nur Delphi können und von PHP keine Ahnung haben und deswegen poste ich hier mal meine PHP-Code, die die Datei empfangen und speichern soll. Code:

Quelltext
1:
2:
3:
4:
5:
6:
7:
<?php
if (isset ($datei))
{
copy ($datei, "files/$datei_name");
unlink ($datei);
}
?>


Ihr wisst garnicht wie sehr ich mich freuen würde, wenn mir endlich Jemand sagen könnte, wie das funzt ... Schon seit Tagen komme ich mit dem Problemm nicht klar.

Ich danke schon im voraus, falls mir Jemand helfen kann.

MfG
Paprika


thebe - Do 19.06.03 21:46

najaaaaaa
Ich hät nen schimmer was man machen könnt, wird dir aber wohl nit gefallen. Einfach inner URL dann pro Byte die ASCII Zeichen ranhängen.

Bsp: http://www.test.de/test.php?datei=%3F%A9%23%89

usw.

Denke aber nit das das der Browser mitmachen würd


matze - Fr 20.06.03 10:36

lad die dateui doch per http post hoch. das geht genauso und ist soviel ich gehört hab einfacher in php denn um put zu können braucht man nochwas imapache oder ein php modul oder sonst was.


kasi - Fr 20.06.03 15:59
Titel: indy 9

Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
procedure TForm1.UploadFile(Filename, ContentType: string);
var
  Stream: TIdMultiPartFormDataStream;
  StringStream: TStringStream;

begin
Stream := TIdMultiPartFormDataStream.Create;
StringStream := TStringStream.Create('');
try
  Stream.AddFile('datei',Filename, ContentType);
  IdHTTP1.Post(EURL.Text, Stream, StringStream);
  Memo1.Text := StringStream.DataString;
finally
  Stream.Free;
  StringStream.Free;
end;
end;


matze - Fr 20.06.03 16:07

genau so !


matze - Sa 21.06.03 12:32

jetzt hab ich mal nochne frage: hbei mir kommt immer der fehler dass er TIdMultiPartFormDataStream nicht kennt !!! muss ich da noch was einbinden ?


matze - Sa 21.06.03 12:33

hat sich grad erledigt !! :oops: