ليست کردن تمام فايلهاي درون تمام فولدر ها و زير فولدر هاي ftp

[pourjafari]

به نام خدا
با سلام

من نياز دارم که ليست کاملي از فايلهاي درون دايرکتوري اصلي و تمام زير دايرکتوري هاي دايرکتوري ريشه ي FTP را بدست آورم.
البته ترجيحا کد هاي مربوطه در Visual Basic 2005 باشد.اما اگر در Visual Basic 6 هم بود کفايت مي نمايد.
لطفا هر چه زود تر مرا ياري کنيد.

با تشکر.

[ΛΛ Θ l-l $ Σ Ω]

If p.Text = "123" Then
Unload form2
Form1.Show
Else
p.Locked = True
p.ForeColor = vbRed
End If

؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟