Visual Basic - AYUDA comando"GET" conexion FTP

el siguiente codigo hace una conexion a un servidor de ftp pero el problema es que el comando "GET" no lo realiza.Alguien me puede decir la causa del problema o me puede comentar como se utiliza el comando "get".Este es el código de programa.GRACIAS

Private Sub cmdretrieve_Click()
Me.Cls
Inet1.Protocol = icFTP
Inet1.RemoteHost = "XXX.XXX.XXX.XXX"
Inet1.RemotePort = "21"
Inet1.UserName = "usuario"
Inet1.Password = "contraseña"


Inet1.Execute , "get 1.txt c:\1.txt "
While Inet1.StillExecuting
DoEvents
Wend

MsgBox "correcto"

End Sub

Private Sub Inet1_StateChanged(ByVal State As Integer)
Select Case State
Case 12
stemp = Inet1.GetChunk(100)

While stemp <> ""
Me.Print stemp;
stemp = Inet1.GetChunk(100)
Wend
Me.Print

Case 11
MsgBox Inet1.ResponseInfo, vbCritical, "ERROR!"
End Select

End Sub