FTP VB 6 , ternyata mudah ..

Private Sub Form_Load()
Inet1.URL = "nama hot"
Inet1.UserName = "usernama"
Inet1.Password = "password"


file = "nama file"
Inet1.Execute Inet1.URL, "PUT C:\users\nama file " & file
End Sub

====================atau dengan send ============

Private Sub Command1_Click()
Inet1.URL = "127.0.0.1"
Inet1.UserName = "user"
Inet1.Password = "password"

Inet1.Execute Inet1.URL, "send D:\is.jpg /ronnet.jpg"
End Sub