小弟想从服务器上往本地磁盘拷贝文件和文件夹怎么做啊?可以更新覆盖本地同名文件和文件夹。求各位大虾完整的程序代码。
解决方案 »
- GDI画图问题
- 使用XLSReadWrite控件如何为sheet改名?
- 用edit来显示adoquery的问题!
- 如何将服务器上的数据库导出成Excel文件,最好用存储过程实现
- unsatisfied forward or external declaration: 'TForm1.myFunction'这个错误是什么意思呢?
- 好久没来了,散分
- 怎样使procedure有返回值,并且可以在另一函数中调用它并取得其返回值?
- 请问使用Scksrvr是怎么实现COM调用的,在线等待
- 如何监测一个表的更新
- 如何实现绘图板中,选取区域的效果????
- 小弟在线急求,用DELPHI下文件夹覆盖拷贝的问题。100分
- INDY 中IDPOP3收邮件问题(比较难),急!
给你一段我编好的原码;已经给你详细注解了:
//使用控件"FTP"
q_FileName:=OpenFile1.FileName;//取文件完整路经+文件名
q_File:=ExtractFilename(OpenFile1.FileName);//取文件名
//连接FTP服务器
FTP.Host:=trim(ip.Text);//FTP服务器IP
FTP.Port:=strtoint(trim(port.Text));FTP端口默认为21
FTP.UserName:=trim(user.Text);//FTP服务器登入用户
FTP.Password:=trim(password.Text);//FTP服务器登入密码
FTP.Connect;
//上传
FTP.Put(q_FileName,q_File);
//下载
//FTP.Get('dest.xls','c:\ddd.xls');
/////断开连接
FTP.Disconnect;