FTp server d 2005

[peter12]

Versuche ein Programm von delphi 5 auf delphi 2005 net umzuwandeln um die Net Sprache zu lernen.
Da suche ich eine möglichkeit auf den FTP server zuzugreifen.
Suche auch Beispiele von den componentOne Komponeneten.
Kann mir jemand helfen.

peter

[r_kerber]

IMHO sind die Indy's auf .net umgestellt.

[peter12]

Lösung

Delphi-Quellcode:

function PutFile1(Server, Port, UserName, Password, LocalFile, RemoteFile: String): Boolean;
var
  InternetOpn: hInternet;
  InternetCon: hInternet;
begin
  InternetOpn := InternetOpen('iexplore', INTERNET_OPEN_TYPE_DIRECT, nil, nil, 0);
  InternetCon := InternetConnect(InternetOpn,
                                 convert.tostring(Server),         // FTP Server
                                 convert.ToInt32(Port),        // FTP Port
                                convert.tostring(Username),       // FTP UserName
                                 convert.tostring(Password),       // FTP Password
                                 INTERNET_SERVICE_FTP,  // dwService
                                 INTERNET_FLAG_PASSIVE, // dwFlags
                                 0);                    // dwContext


    Result :=  FtpgetFile(InternetCon,
                                      // LocalFile
              convert.tostring(RemoteFile), convert.tostring(LocalFile),
             true,(0),                        // RemoteFile
             FTP_TRANSFER_TYPE_UNKNOWN,                 // dwFlags
             0);
      InternetCloseHandle(InternetOpn);
end;

so einfach

peter

[edit=r_kerber]Fehlendes Delphi-Tag eingetragen Mfg, r_kerber[/edit]

[r_kerber]

Damit setzt Du aber voraus, daß auch dem PC der IE installiert ist, oder?