TWebCopy uses the Wininet API to load the selected files via http or ftp from Intranet or Internet sites or can copy files by UNC name over the network. It features a progress / cancel dialog and threaded execution. (ASP script available to handle POST based HTTP uploads)
WebCopy can be configured to retrieve automatically only newer files w.r.t. to a configurable date.
Files to copy over the web can be easily set at design time using a Items collection or programmatically :
HTTP:
with WebCopy.Items.Add do begin URL := 'http://www.tmssoftware.com/webcopy.zip'; Protocol := wpHTTP; FileDate := EncodeDate(2002,3,18); CopyNewerOnly := true; TargetDir := 'c:\temp'; end;
FTP:
with WebCopy.Items.Add do begin FTPHost := ftp.tmssoftware.com FTPUserID := 'myuserid'; FTPPassword := 'mypassword'; URL := 'webcopy.zip'; Protocol := wpFTP; FileDate := EncodeDate(2002,3,18); CopyNewerOnly := true; TargetDir := 'c:\temp'; end;
Network file copy:
with WebCopy.Items.Add do begin URL := '\\machine\dir\webcopy.zip'; Protocol := wpFile; FileDate := EncodeDate(2002,3,18); CopyNewerOnly := true; TargetDir := 'c:\temp'; end;
Multi file upload via FTP:
WebCopy.Items.Clear; with WebCopy.Items.Add do begin Protocol := wpMultiFtpUpload; URL := 'c:\directory\myfiles\*.txt'; FTPHost := ftp.myserver.com; FTPUserID := myuserid; FTPPassword := mypassword; TargetDir := ftpserverdir; end; WebCopy.Execute;
Multi file download via FTP:
WebCopy.Items.Clear; with WebCopy.Items.Add do begin Protocol := wpMultiFtp; URL := 'ftpdirectory\*.txt'; FTPHost := ftp.myserver.com; FTPUserID := myuserid; FTPPassword := mypassword; TargetDir := 'c:\localdir\ftpdownload'; end; WebCopy.Execute;
http://www.tmssoftware.com/
Greetz to DELiGHT (hello my mate at dlt) Searchin' +100MBiT +1024GB NON DE/AT/LW AFFiLSiTES & a asc" dude ;)