Discussion :

[ikeabp]

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

[Pol63]

essaye d'envoyer en ascii à tout hasard
les ftp prennent en compte le transfert ascii ou binaire

tu peux aussi essayer sans stream avec le webclient

[ikeabp]

essaye d'envoyer en ascii à tout hasard
les ftp prennent en compte le transfert ascii ou binaire

tu peux aussi essayer sans stream avec le webclient

Bonjour,

Bien vu avec miRequest.UseBinary = False donc en ASCII pas de pb. Je ne vois pas trop pourquoi... mais bon.
Merci

[Pol63]

ca doit venir d'unix (et donc de linux) dont le caractère de fin de ligne est différent