小弟想从服务器上往本地磁盘拷贝文件和文件夹怎么做啊?可以更新覆盖本地同名文件和文件夹。求各位大虾完整的程序代码。

解决方案 »

  1.   

    copyfile('\\server\source','c:\dest',false);
      

  2.   

    FTP下载  下载之后再复制  去盒子论坛搜搜  FTP,HTTP  能找到很多原码
      

  3.   

    我们公司数据交换就是用的FTP,但当连接的客户端达到一定数量后其他就不能连接了,请问FTP连接是不是有数量限制?或有什么更好的办法
      

  4.   


    给你一段我编好的原码;已经给你详细注解了:
    //使用控件"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;