大概是2003年 我发在vckbase上的一篇小文章
03年啊 好久了
原文地址 http://www.vckbase.com/document/viewdoc/?id=734
———————————————————————————————-
微软提供了一个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;j
{
m_ii=”\t”;
m_ftpinfo=m_ftpinfo+m_ii;
}
m_ftpinfo +=m_i;
UpdateData(FALSE);
}
}
finder.Close(); //连接关闭
for(int i=0;i
{n++;
m_i=”["+m_Dir.GetAt(i)+"]“+”\r\n”; //在目录的名字外面加上[]for (int j=1;j
{
m_ii=”\t”;
m_ftpinfo=m_ftpinfo+m_ii;
}
m_ftpinfo +=m_i; //先显示目录的名字
UpdateData(FALSE);BOOL m_suc=0;
while (!m_suc) //进入目录里面
{
m_suc=m_pFtpConnection->SetCurrentDirectory(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);
}
}
请问JTREE这么显示FTP服务器上文件的 目录？
留一下jl881984@163.com