I have the following code that works:
However, I have a string problem because the following code will not work:Code:Private Sub cmdSend_Click() With Inet1 .Protocol = icFTP .URL = "xxx.xxx.xxx.xxx" .UserName = "xxx" .Password = "xxx" .Execute , "PUT C:\Test.txt Test.txt" End With End Sub
I would appreciate any help. Thank you.Code:Private Sub cmdSend_Click() Dim strFileHost As String, strFileRemote As String strFileHost = "C:\Test.txt" strFileRemote = "Test.txt" With Inet1 .Protocol = icFTP .URL = "xxx.xxx.xxx.xxx" .UserName = "xxx" .Password = "xxx" .Execute , "PUT " & strFileHost & " " & strFileRemote End With End Sub
[Edited by bedowin on 08-24-2000 at 09:31 PM]





Reply With Quote