تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] how to send file with progressbar via TcpClient ?
#1
كود :
Dim ns As NetworkStream
                 ns = cli.GetStream
                 Dim bytes() As Byte = New Byte(cli.ReceiveBufferSize - 1) {}
                Dim i As Integer = 0
                 Do While cli.GetStream.DataAvailable = True
                    bytes(i) = cli.GetStream.ReadByte()
                    i += 1
                    'msg = System.Text.Encoding.ASCII.GetString(bytes, 0, i)
                    'Form3.ProgressBar1.Value = cli.Available / i * 100
                Loop

i will send by client to server
server and client work on my pc for test
so i want send file by client
and receved it by server and progressbar will be in server form
الرد }}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم