ProgressBar1.Visible = True ProgressBar1.Minimum = 1 ProgressBar1.Value = 1 ProgressBar1.Step = 1024 Dim MemoryStreamImage As New IO.MemoryStream() Dim myWebRequest As Net.WebRequest = Net.WebRequest.Create(TextBox1.Text) Dim myWebResponse As Net.WebResponse = myWebRequest.GetResponse() ProgressBar1.Maximum = Convert.ToInt32(myWebResponse.ContentLength) Dim StreamImage As IO.Stream = myWebResponse.GetResponseStream() Dim b(1024) As Byte Dim bytesRead As Integer = StreamImage.Read(b, 0, b.Length) Do While bytesRead > 0 MemoryStreamImage.Write(b, 0, bytesRead) ProgressBar1.PerformStep() bytesRead = StreamImage.Read(b, 0, b.Length) Loop StreamImage.Close() PictureBox1.Image = New Bitmap(MemoryStreamImage) MemoryStreamImage.Close() myWebResponse.Close()
Dim MemoryStreamImage As New IO.FileStream(Application.StartupPath & "DESTINATION_DU_FICHIER", IO.FileMode.Create) Dim myWebRequest As Net.WebRequest = Net.WebRequest.Create(TextBox1.Text) Dim myWebResponse As Net.WebResponse = myWebRequest.GetResponse() ProgressBar1.Maximum = Convert.ToInt32(myWebResponse.ContentLength) Dim StreamImage As IO.Stream = myWebResponse.GetResponseStream() Dim b(1024) As Byte Dim bytesRead As Integer = StreamImage.Read(b, 0, b.Length) Do While bytesRead > 0 MemoryStreamImage.Write(b, 0, bytesRead) ProgressBar1.PerformStep() bytesRead = StreamImage.Read(b, 0, b.Length) Loop StreamImage.Close() MemoryStreamImage.Close() myWebResponse.Close()
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionMemoryStream MemoryStreamImage = new MemoryStream(); WebRequest myWebRequest = WebRequest.Create(TextBox1.Text); WebResponse myWebResponse = myWebRequest.GetResponse(); ProgressBar1.Maximum = Convert.ToInt32(myWebResponse.ContentLength); Stream StreamImage = myWebResponse.GetResponseStream(); byte[] b = new byte[1024]; int bytesRead = 0; while ((bytesRead = StreamImage.Read(b, 0, b.Length)) > 0) { // MemoryStreamImage.Write(b, 0, b.Length); MemoryStreamImage.Write(b, 0, bytesRead); ProgressBar1.PerformStep(); } StreamImage.Close(); PictureBox1.Image = new Bitmap(MemoryStreamImage); MemoryStreamImage.Close(); myWebResponse.Close(); } public static void Main() { Application.Run(new Progressbar() ); } } }
System.ArgumentException: Le paramètre n'est pas valide.
à System.Drawing.Bitmap..ctor(Stream stream)
à world_of_boss_reborn.Installations.PictureBox2_Click(Object sender, EventArgs e) dans C:\Documents and Settings\MacWarrior\Bureau\World Of Boss V.4\World Of Boss V.3\Installations.vb:ligne 35
à System.Windows.Forms.Control.OnClick(EventArgs e)
à System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks)
à System.Windows.Forms.Control.WndProc(Message& m)
à System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
à System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
à System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)
PictureBox1.Image = New Bitmap(MemoryStreamImage)
My.Computer.FileSystem.WriteAllBytes(Application.StartupPath & "DESTINATION_DU_FICHIER", SOURCE_DU_FICHIER (je ne sais pas quoi mettre ici ), False)