ftp problem

[uainfantry]

Option Explicit
Dim Inet1
 
 
 
Private Sub Timer1_Timer()
 
'Upload or download files to FTP sites u
'sing only 5 lines of code!'Thanks for the example Venari, it's great to get 'shown up' sometimes! >:-D
With Inet1
.Protocol = icFTP
.UserName = "user" 'FTP servers require a valid logonid and password
.Password = "pass" 'before they Let you upload.
.RemoteHost = "mysite"
.Execute , "SEND C:\demo"
End With
End Sub

I get Variable not defined error. Something with icFTP I think.