使用CFtpFileFind和递归算法来遍历ftp目录

微软提供了一个WinInet网络编程接口,可以让程序员在较高层次建立Internet客户应用程序.封装了Winsock API 来简化网络编程过程. 使用WinInet提供的十二个类中的一些,使程序员不需要了解Windows套接字的细节,只要几个函数既可完成链接和一些功能.这里给出一个简单的例子,来遍历一个ftp所有的文件,并输出一个有层次的列表.

首先建立一个对话框的程序,其中加入五个文本编辑框,分别用来输入ftp地址,端口,用户名,密码,和输出列表.再加入一个按钮.分别加入变量如下:

CString m_host; //ftp地址
CString m_username;//用户名
CString m_password;//密码
int m_port;//端口
CString m_ftpinfo;//输出的消息

同时还需要在头文件中加入如下几个变量:

CInternetSession *m_pInetSession;//WinInet类之一,创建并初始化Internet会话
CFtpConnection *m_pFtpConnection;//建立Ftp连接
int n;//用来产生层次的ftp输出目录,因为要重复使用,所以在这里定义

再定义一个遍历函数

afx_msg void List();

ok! 头文件到此为止.
在初始化函数中,设置 n=0;
添加按钮的事件,

void Cmfcftp3Dlg::OnBnClickedButton1()
{
m_pInetSession=new CInternetSession(AfxGetAppName(),1,PRE_CONFIG_INTERNET_ACCESS);
UpdateData(TRUE);

 try 
 {
  m_pFtpConnection=m_pInetSession->GetFtpConnection(m_host,m_username,m_password,m_port);
    
  if (m_pFtpConnection != NULL)
 
  {
   CString m_i;
   m_i="连接成功\r\n";
      m_ftpinfo +=m_i;
      UpdateData(FALSE);  
   List();       
      }
 }
 catch (CInternetException * pEx)
 {
  CString m_i;
   m_i="连接no成功\r\n";
    m_ftpinfo +=m_i;
    UpdateData(FALSE);
  TCHAR szError[1024];
  if ( pEx->GetErrorMessage(szError,1024)) 
  {
    
   m_i=(CString) szError;
     m_ftpinfo +=m_i;
    UpdateData(FALSE);
  }
  else 
   AfxMessageBox("There was an exception");
  pEx->Delete();
  m_pFtpConnection=NULL;
 }
}

上面的是个简单又标准的连接方法.真正的核心在下面:

void Cmfcftp3Dlg::List()
{
   CString m_i;
   CString m_ii;//用来保存一些临时信息
   CStringArray m_Dir;//用数组来保存目录
   CFtpFileFind   finder(m_pFtpConnection);
   BOOL bWorking=finder.FindFile(_T("*"));

   while (bWorking)
         {
           bWorking = finder.FindNextFile();
     if ( finder.IsDots() ) continue;
     if (finder.IsDirectory())
         {  
     m_Dir.Add( finder.GetFileName());//如果是目录的话,就保存在数组里
         }
     else
           {
     m_i=finder.GetFileName()+"\r\n";//如果不是目录的话,就先显示出来
         for (int j=0;jSetCurrentDirectory(m_Dir.GetAt(i));
    }
        
    List();         //递归调用!
    BOOL m_suc1=0;
    while(!m_suc1)
    {
        m_suc1= m_pFtpConnection->SetCurrentDirectory("..");
    }
    n--;   //控制层次的
   }
}

这里有个问题就是关于CFtpFileFind的调用,不能同时有两个CFtpFileFind的函数存在,
否则会出错,这也是为什么要用数组保存的原因! 对此msdn的解释是:
ERROR_FTP_TRANSFER_IN_PROGRESS
The requested operation cannot be made on the FTP session handle because an
operation is already in progress.

需要改进的地方,一个是线程的问题,遍历很占用资源,所以最后专门用个线程来.
再,一是可能是递归效率的问题,一可能是WinInet的问题,当需要遍历的目录比较多或者深的时候,
可能会出现程序显示没有响应.

其他: 刚好今天收到一位csdn上的朋友的信,告诉我他的解决方法.大同小异,一起附上,但没有测试.
来自nicky:

void ExpoloerDir(CString strDir) {
  CFtpFileFind finder(pFtp);
  CString filename;
CStringList list;

  m_pFtp->SetCurrentDirectory(strDir);
  bool bContinue=(bool)finder.FindFile(“*”);
  while(bContinue) {
      bContinue=finder.FindNextFile();
      filename=finder.GetFileName();
      if(filename=="."||filename=="..")
          continue;
      if(finder.IsDirectory()==true)
          list.AddTail(filename);
  }
  finder.close();

  while(list.IsEmpty()==false) {
strDir=list.RemoveHead();
ExplorerDir(strDir);
}
}