ftp den veri çekmek

[aherab]

arkadaşlar şu kodu kullanıyorum ( internetten epey dolaştım ve sonuç bu ama çalışmıyor ) ;

Private Sub Form_Load()
Inet1.URL = "ftp://ftp.em..................com"
Inet1.RemoteHost = "ftp://ftp.em..................com"
Inet1.Protocol = icFTP
Inet1.RemotePort = "21"
Inet1.UserName = "kullanıcı adı"
Inet1.Password = "şifrem"
End Sub

Private Sub Command1_Click()
Shell ("C:\\Program Files\\Internet Explorer\\iexplore.exe ftp://ftp.e.....com/dosya.rar")
End Sub

-----------------------------------------------------
fakat bana tekrar kullanıcı adı ve şifre soruyor neden ? sanırım ftp ye bağlanamadım ?

 

[gulsum1]

Inet1 dediğin internet transfer activex ini yüklemen lazımki onuda 2003 desteklemiyor

 

[gulsum1]

bu ftp den veri getirmez sadece ftp den dosya download yada upload eder

 

[aherab]

tamam amacım zaten ftp den dosya indirmek

 

[aherab]

arkadaşlar fikri olan yok mu ?