Datei Runterladen und verschieben....

[bob_aus_der_flasche]

hey leute

hab mal wieder ein prob hier^^

mein programm soll folgendes leisten:
1. Per Knopfdruck eine datei von einem FTP runterladen (wahrscheinlich eine .ini datei)
2. die datei soll dann in einen von mir vorgegebenen ordner verschoben werden (ggf. kann der ordner auch manuell ausgewählt werden)

ich hoffe mal, dass einer von euch ne lösung parat hat^^

greetz bob
:hello: :corky:

[Klaus01]

Hallo Bob,

schon mal die Suche bemüht?
Einige Threads unter dem Deinem findest Du schon einen Ansatz.

Was hast Du denn bereits selber geschafft?

Grüße
Klaus

[Fussball-Robby]

Zum runterladen hab ich hier eine Funktion, die ich irgendwann mal nach Stunden der Suche hier im Forum gefunden hab:

Delphi-Quellcode:

//uses WinInet;

function getfile(server, username, password, localfile, remotefile: string; port: word = 21): boolean;
var
  hopen, hconnect: HINTERNET;
begin
  hopen := InternetOpen('myagent', INTERNET_OPEN_TYPE_DIRECT, nil, nil, 0);
  hconnect := InternetConnect(hopen, pchar(server), port, pchar(username), pchar(password), INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0);
  Result := FtpGetFile(hconnect, pchar(localfile), pchar(remotefile), false, 0, FTP_TRANSFER_TYPE_UNKNOWN, 0);
  InternetCloseHandle(hconnect);
end;

//Aufruf:

if getfile('URL.DE', 'NAME123', 'Banane', '/Datei/test.ini', 'C:\test.ini') then beep;

Damit lädst du vom Server 'URL.DE' mit dem Benutzernamen 'NAME123' mit dem Passwort 'Banane' aus dem Ordner 'Datei' die Datei 'test.ini' runter und speicherst sie unter 'C:\test.ini'.

So, das wär dann mal ein Ansatz, den Rest schaffst du aber denke ich selber :wink:

Mfg

[SirThornberry]

welchen sinn macht es Dateix an OrtY runter zu laden um diese dann zu verschieben nach OrtZ? Warum lädst du sie nicht gleich nach OrtZ runter?

[bob_aus_der_flasche]

also das mit dem runterladen funzt

nur leider nur mit .ini dateien

ich brauch aber ne funktion die auch mit .dds bilder funktioniert

habt ihr sowas vielleicht?^^

danke schonmal im voraus

Greetz

[SirThornberry]

es spielt keine rolle was es für eine Datei ist. Der Inhalt und der Name ist irrelevant für die Funktionsfähigkeit.

[DP-Maintenance]

Dieses Thema wurde von "SirThornberry" von "Object-Pascal / Delphi-Language" nach "Internet / LAN / ASP.NET" verschoben.

[bob_aus_der_flasche]

also mit der funktion, die "Fussball-Robby" bereitgestellt hat, funktioniert der DL nicht mit .dds dateien

ich glaube außerdem nicht, dass ich was falsch mache

greetz

[Die Muhkuh]

Wie rufst Du die Funktion auf?

[bob_aus_der_flasche]

ich rufe sie so auf:

getfile('URL.DE', 'USERNAME', 'PASSWORT', '/unterverzeichnis/bilddatei.dds', 'C:/bilddatei.dds'));

[Fussball-Robby]

Zitat:

Zitat von bob_aus_der_flasche

getfile('URL.DE', 'USERNAME', 'PASSWORT', '/unterverzeichnis/bilddatei.dds', 'C:/bilddatei.dds'));

Als erstes fällt mir auf, das die Zielpfadangabe falsch ist. Es heißt nicht 'C:/bilddatei.dds' sondern 'C:\bilddatei.dds'. Ansonsten könnte es nur daran liegen, dass die Datei nicht auf dem Server liegt oder du dich vertippt hast.

Mfg

[bob_aus_der_flasche]

also, habe jetz ALLES ausprobiert

1. Zielpfadangabe geändert => geht trotzdem nich
2. getestet ob die dateien existieren => existieren und haben richtigen namen (tippfehler ausgeschloßen)

er schafft es trotzdem nur die .ini datei zu laden

so lass ich das programm saugen:
getfile('URL.DE', 'USERNAME', 'PASSWORT', '/unterverzeichnis/inidatei.ini', 'C:/inidatei.ini'));
getfile('URL.DE', 'USERNAME', 'PASSWORT', '/unterverzeichnis/bilddatei.dds', 'C:/bilddatei.dds'));
getfile('URL.DE', 'USERNAME', 'PASSWORT', '/unterverzeichnis/bilddatei.dds', 'C:/bilddatei.dds'));

warum schafft er es dann nur, die .ini-datei zu saugen???

ich habe, wie oben gesagt, alles geändert auf das du mich hingewiesen hast aber trotzdem geht es nur mit der .ini-datei
:wall: :wall: :wall: :wall:

[Fussball-Robby]

Du hast aus C:/ immer noch nicht C:\ gemacht

[bob_aus_der_flasche]

ich hab doch gesagt, dass das nix zur sache tut

hab es '/' und '\' versucht

er hat es bei beiden versionen immer nur geschafft die .ini-datei zu saugen

[MrKnogge]

Kann es sein, dass er nach "getfile('URL.DE', 'USERNAME', 'PASSWORT', '/unterverzeichnis/inidatei.ini', 'C:/inidatei.ini'));" aus der Funktion springt ?

[bob_aus_der_flasche]

alles klar jetz funktioniert es...

er is wirklich vorher aus der funktion gesprungen nach dem saugen der.ini-datei

habs aber jetz gefixt^^

falls ihr sehen wollt, woran ich gearbeitet habe, HIER der link zum prog

Greetz


p.s. könnt ihr mir vllt noch sagen wie ich den pfad zu einem ordner in einem editfeld anzeigen lassen kann?
ich will nämlich, dass man nen knopf drückt, dann öffnet sich ein fenster und man wählt den ordner aus,
in den die dateien gedownloadet werden

mit opendioalog kann man ja nur den pfad zu einer datei angeben