FTP Library ReadDirectory() Error

sfFTPLib::IGlobalPtr pGlobal;



HRESULT hr = pGlobal.CreateInstance(__uuidof(sfFTPLib::Global));



if(SUCCEEDED(hr))



{



    // verify license key



    if(pGlobal->LoadLicenseKeyData(g_szLicenseKey) == VARIANT_TRUE)



        _tprintf(_T("License key verified.n"));



    else



        _tprintf(_T("Failed to verify license key.n"));



}







sfFTPLib::IFTPConnectionPtr ftp;



hr = ftp.CreateInstance(__uuidof(sfFTPLib::FTPConnectionMTA));



if(SUCCEEDED(hr))



{



    // AUTH TLS



    //ftp->Protocol = sfFTPLib::ftpProtocolSSLExplicit;



    ftp->Protocol = sfFTPLib::ftpProtocolNormal;



    ftp->Host = _T("[fe80::20f:20ff:fe27:95ae%4]");



    ftp->Port = 21;



    ftp->Username = _T("knkim");



    ftp->Password = _T("test123");



    ftp->Passive = VARIANT_TRUE;







    // No Proxy



    ftp->ProxyType = sfFTPLib::ftpProxyTypeNone;



    ftp->ProxyHost =_T("192.168.1.10");



    ftp->ProxyPort = 1080;



    ftp->ProxyAuthentication = VARIANT_TRUE;



    ftp->ProxyUsername = _T("user");



    ftp->ProxyPassword = _T("pass");







    // log everything 



    ftp->LogFile = _T("Win32Demo.log");







    // Connect



    sfFTPLib::enumError err = ftp->Connect();



    if(err == sfFTPLib::ftpErrorSuccess)



    {



        // change directory



        err = ftp->ChangeDirectory(_T("./"));



        if(err == sfFTPLib::ftpErrorSuccess)



        {



            printf("ChangeDirectory() OKn");



    	



            // read listing



            err = ftp->ReadDirectory();



            if(err == sfFTPLib::ftpErrorSuccess)



            {



                printf("ReadDirectory() OKn");







	sfFTPLib::IFTPDirectoryPtr pDirectory = ftp->Directory;



	if(pDirectory)



	{



                    int nCount = pDirectory->Count;



                    _tprintf(_T("Count = %dn"), nCount);  







                    // Enum



                    if(nCount > 0)



                    {



                        IEnumVARIANTPtr pEnum = pDirectory->_NewEnum;



                        VARIANT *pArrVariant = new VARIANT[nCount];



                        if(pArrVariant)



                        {



                            ULONG CeltFetched;



                            if(SUCCEEDED(pEnum->Next(nCount, pArrVariant, &CeltFetched)))



                            {



                                for(ULONG i=0; i<CeltFetched; i++)



                                {



                                    if(pArrVariant[i].vt == VT_DISPATCH)



                                    {



                                        //IDispatchPtr pDisp =;



                                        sfFTPLib::IFTPItemPtr pFTPItem = pArrVariant[i].pdispVal;



                                        if(pFTPItem)



                                        {



                                            _tprintf(_T("Type=0x%x; Name=%s; Size=%dn"), pFTPItem->Type, (LPCTSTR)pFTPItem->Name, pFTPItem->Size);



                                            if(pFTPItem->Type == sfFTPLib::ftpItemTypeLink)



                                            {



                                                _tprintf(_T("LinkPoint=%s"), (LPCTSTR)pFTPItem->LinkPoint);



                                            }



                                        }



                                    }



                                    ::VariantClear(&pArrVariant[i]);



                                }



                            }



                            delete [] pArrVariant;



                        }



                    }



                }



            }



            else



            {



                _tprintf(_T("ReadDirectory() failed. Error=%dn"), err);



                _tprintf(_T("LastReplyCode = %dn"), ftp->LastReplyCode);



                _tprintf(_T("LastReply = %sn"), (LPCTSTR)ftp->LastReply);



            }



        }



    }



    else



    {



        if(err == sfFTPLib::ftpErrorLicense)



            _tprintf(_T("Please acquire a license from https://www.smartftp.comn"));



        else



            _tprintf(_T("Connect() failed. Error=%dn"), err);



    }



}



else



{



    _tprintf(_T("Failed to create CFTPConnection instance.n"));



}