Voici mon code:
Dim site As Integer
Dim filename As String
ChDir "C:\"
filename = "temptemp.txt"
Open "temptemp.txt" For Append As #111
Print #111, "open ftp.multimania.com"
Print #111, "USER xxxxxxx"
Print #111, "xxxxxxx"
Print #111, "cd " + "/allo/" + Text4
Print #111, "delete Used.txt"
Print #111, "put c:\Used.txt"
Print #111, "quit"
Close #111
site = Shell("ftp -n -s:c:\temptemp.txt")
Kill "Used.txt"
Kill "temptemp.txt"
Lorsque que je l'execute, une erreur aparait "OVERFLOW". Le problème est je crois
Dim site As Integer
La commande FTP en DOS s'execute par exemple parfaitement.
Qqun peu m'aider?