uploading files with inet control

[nick404]

I need my aplication sends three files to a server. I put the code:

Private Sub cmdPublish_Click()

With Inet1
.URL = "ftp://ftp.thedomain.com"
.UserName = "username"
.Password = "password"
.Execute , "cd /www/htdocs/some_dir"
.Execute , "PUT " + App.Path + "\file1.txt file1.txt"
.Execute , "PUT " + App.Path + "\file2.txt file2.txt"
.Execute , "PUT " + App.Path + "\file3.txt file3.txt"
.Execute , "CLOSE"
End With

End Sub

After the line .Execute , "cd /www/htdocs/some_dir" I get an error:
Run-Time error '35764': Still executing last request

How can I have the aplication wait between each of the .Execute instructions?

Thank you very much !

Put a DoEvents in between each one so that it can do what it is suppose to before continuing on to do the next task.