در خواست كد براي مشاهده ليست فايل هاي يك دايركتوري در ftp

[علی رضائی]

من يك كد براي ارسال فايل به يك پوشه در ftp دارم و فايل ها رو به اون ارسال مي كنم همچنين دريافت ها نيز آن موفقيت آميز هستند.

FtpUpload ('1.doc'),'folder1/1.doc','ftp.sait.com','username','pass');
الان نياز به يك كد دارم كه ليست فايلهاي اون پوشه رو نشون بده.
لطفا به كامپوننت ها ارجاع ندهيد. اگر مقدور است در مورد كد توضيح بفرماييد. متشكرم

[BORHAN TEC]

به اینجا مراجعه کن:
http://www.delphipages.com/forum/showthread.php?t=186595

[علی رضائی]

به اینجا مراجعه کن:
http://www.delphipages.com/forum/showthread.php?t=186595

ضمن تشكر ، لينك بالا در حد خيلي حرفه اي توضيح داده و من نتونستم فانكشن هاش را كه گفته بسازم.
ولي موقع اجراي كد هم بعد از شرط if خطا مي ده. اگر توضيح بديد خيلي ممنون مي شم.
if ftp.DirectoryListing (ftp://ftp.DirectoryListing)[i-1].ItemType=ditDirectory then
if (l.Items[i-1].LocalFileName<>'.') and (l.Items[i-1].LocalFileName<>'..') then

[BORHAN TEC]

ولي موقع اجراي كد هم بعد از شرط if خطا مي ده.
چه خطایی میده؟؟؟