Thema: Delphi CopyFile to Freigabe

Einzelnen Beitrag anzeigen

newuser01

Registriert seit: 31. Aug 2006
248 Beiträge
 
Delphi 7 Professional
 
#1

CopyFile to Freigabe

  Alt 5. Okt 2009, 13:10
Hallo,


Ich möchte gerne eine Datei von einem Rechner zu einem anderen (Netzwerkfreigabe) kopieren.


Die Freigaben existieren und das Netzwerk ist auch ok, es kommt aber immer nur eine 0 byte große Datei an


[delphi]

//in slIPs befindet sich die IP-Adresse des Rechners wo die Freigabe (tto) ist

if OpenDialog1.Execute then
begin

CopyFile(PChar(OpenDialog1.Filename), PChar('\\' + slIPs.Strings[0] + '\tto\' + ExtractFileName(OpenDialog1.Filename)), true);

end;


vielleicht könnt ihr ja helfen
Gruß: Holger

[Hobby-Programmierer]
  Mit Zitat antworten Zitat