Réponse acceptée !
Bon ben finalement j'enregistre le fichier txt du ftp en utilisant ce code

                    Response.Buffer = True
                    Response.Clear()

                    'url du fichier a récupérer
                    Dim url = monurl

                    Dim LesData = Server.CreateObject("ADODB.Stream")
                    Dim Lapage = Server.CreateObject("MSXML2.XMLHTTP")

                    'charge le fichier en mémoire
                    Lapage.Open("GET", url, False)
                    Lapage.Send()

                    'creer le flux de donnée pour ecrire le fichier
                    LesData.Open()
                    LesData.WriteText(Lapage.responseText)

                    'ecrit le fichier sur le serveur
                    LesData.SaveToFile(Server.MapPath("./" & "toto.txt"), 2)

                    Lapage = Nothing
                    LesData = Nothing

                    Response.Flush()


et je fais mon traitement aprés.

Bonne journée.