Bonjour, j’ai un petit soucis avec le traitement de stream, je m’embrouille un petit peu :pt1cable:
en gros, je récupère le stream d’un httpWebResponse que j’aimerais retourner en tant que stream (une fois que l’intégralité des données à été recu)
[fixed]Dim respStream As Stream = Response.GetResponseStream
Dim retStream As New MemoryStream
Dim buffer(1023) As Byte
Dim curPos As Integer = 0
Dim count As Integer = respStream.Read(buffer, 0, 1024)
While (count > 0)
retStream.Write(buffer, 0, count)
'retStream.Position = 0
curPos += count
count = respStream.Read(buffer, 0, 1024)
RaiseEvent getResponseProgress(curPos)
End While[/fixed]
Mon problème c’est que quand j’affiche le stream retourné (retStream), il est vide. Si je décommente la ligne commentée, j’ai uniquement le contenu du dernier buffer (j’ai trouvé cette ligne sur le net, je l’ai essayé n’y croyant pas trop, mais je ne m’attendais pas à ce résultat)
J’ai également essayé avec un streamwriter, le résultat est le même
J’aimerai simplement avoir un stream (retStream) que je remplis au fur et à mesure que les données sont téléchargées, et le retourner à la fin, mais apparament, il y a un soucis
edit: si je retourne un tableau de byte contenant l’intégralité des données, ca me va aussi :p, sauf que là je ne sais pas comment remplir et compléter un tableau de byte au fur et a mesure