Bonjour,

Ci dessous le sub qui me permet de récupérer un fichier txt (Test.txt) et de le déposer sur un serveur FTP, le pb est que sur mon serveur FTP (IIS - Windows 2008) pas de pb mais sur un serveur LINUX il y est rajouter des sauts de lignes en plus (Cf. TestApresdepot.txt) ???

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Try
    Dim locname As String = "C:\Temp\Test.txt" 
    Dim miUri As String = "ftp://ftp.xxxxxx.fr/Test.txt"
    Dim miRequest As Net.FtpWebRequest = Net.WebRequest.Create(miUri)
    miRequest.Credentials = New Net.NetworkCredential("zzzz", "xxxx")
    miRequest.Method = Net.WebRequestMethods.Ftp.UploadFile
 
    Dim bFile() As Byte = System.IO.File.ReadAllBytes(locname)
    Dim miStream As System.IO.Stream = miRequest.GetRequestStream()
    miStream.Write(bFile, 0, bFile.Length)
    miStream.Close()
    miStream.Dispose()
 Catch ex As Exception
 
End Try
Test.txt
TestApresdepot.txt