Upload VB2008

charles1453 Messages postés 229 Statut Membre -  
louloukaika Messages postés 523 Statut Membre -
Bonjour,
Je voudrai Uploader une fichier (.xlsx") via une commande vb2008
Ma ligne est la suivante:

My.Computer.Network.UploadFile(Form1.TextBox1.Text, "ftp://ftp.free-h.org/charles.xslx", "Users", "Password")

Mais il y a une exeption qui se produit:
"Une exception s'est produite lors d'une requête WebClient."

Avez vous une solution? svp

Cordialement

1 réponse

  1. louloukaika Messages postés 523 Statut Membre 12
     
    Dim clsRequest As System.Net.FtpWebRequest = _
    DirectCast(System.Net.WebRequest.Create("ftp://xxxx.net/test.txt"), System.Net.FtpWebRequest)
    clsRequest.Credentials = New System.Net.NetworkCredential("username", "password")
    clsRequest.Method = System.Net.WebRequestMethods.Ftp.UploadFile

    'lire le fichier
    Dim bFile() As Byte = System.IO.File.ReadAllBytes("C:\test.txt")

    'uploader le fichier
    Dim clsStream As System.IO.Stream = _
    clsRequest.GetRequestStream()
    clsStream.Write(bFile, 0, bFile.Length)
    clsStream.Close()
    clsStream.Dispose()

    ftp://xxxx.net/test.txt --> test.txt sera le nom sur le ftp, donc, C:\test.text doit etre le meme nom que la requete Create
    voila j'espere que ca peux t'aider ++
    0